gcl-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Gcl-devel] ansi-tests in 2.7.0


From: Paul F. Dietz
Subject: Re: [Gcl-devel] ansi-tests in 2.7.0
Date: Wed, 21 Jul 2004 06:52:52 -0500
User-agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.7) Gecko/20040514

#p"printer-aux.o"

>I wrote:

The problem appears to be this line:

   (setf (readtable-case *readtable*) readcase)

in randomly-check-readability.  I'd recommend this as the next
ansi issue to resolve, since it's blocking the tests.

I've commented this out locally and ansi-tests runs through.
For a gcl built with --enable-ansi, there are 1571 failures
(Athlon XP+, Linux Redhat 9):

1571 out of 16736 total tests failed: COMMON-LISP-USER-PACKAGE-NICKNAMES,
   NO-EXTRA-SYMBOLS-EXPORTED-FROM-COMMON-LISP, CL-FUNCTION-SYMBOLS.1,
   CL-MACRO-SYMBOLS.1, CL-VARIABLE-SYMBOLS.1, SYMBOL-VALUE.ERROR.5,
   MAKE-SYMBOL.11, SYMBOL-FUNCTION.ERROR.5, SPECIAL-OPERATOR-P.1,
   SPECIAL-OPERATOR-P.2, GET.5, GET.6, GET.ORDER.2, GET.ORDER.4,
   EVAL-AND-COMPILE-MACROS, COMPILE.2, COMPILE.5, COMPILE.6, COMPILE.7,
   COMPILE.8, CONSTANTP.6, CONSTANTP.8, CONSTANTP.ORDER.2, EVAL-WHEN.1,
   DEFINE-COMPILER-MACRO.ERROR.1, DEFINE-COMPILER-MACRO.ERROR.2,
   DEFINE-COMPILER-MACRO.ERROR.3, DEFINE-SYMBOL-MACRO.ERROR.1,
   DEFINE-SYMBOL-MACRO.ERROR.2, DEFINE-SYMBOL-MACRO.ERROR.3, THE.12,
   THE.14, THE.15, THE.18, THE.20, THE.22, THE.23, DCF-FUNS,
   DCF-MACROS, SETF-VALUES.5, PSETQ.7, PSETF.7, ROTATEF.3,
   DEFINE-SETF-EXPANDER.ERROR.1, THROW-ERROR, DEFUN.4,
   DESTRUCTURING-BIND.20, DESTRUCTURING-BIND.21, EQUAL.13, EQUAL.14,
   FDEFINITION.ERROR.5, FDEFINITION.4, FDEFINITION.5, FLET.17, FLET.51,
   FMAKUNBOUND.4, FUNCALL.ERROR.3, FUNCTION-LAMBDA-EXPRESSION.1,
   FUNCTION-LAMBDA-EXPRESSION.2, FUNCTION-LAMBDA-EXPRESSION.ORDER.1,
   FUNCTION-LAMBDA-EXPRESSION.ERROR.1,
   FUNCTION-LAMBDA-EXPRESSION.ERROR.2, FUNCTION.2, FUNCTION.6,
   FUNCTION.10, FUNCTIONP.2, FUNCTIONP.6, FUNCTIONP.10,
   GET-SETF-EXPANSION.ERROR.1, GET-SETF-EXPANSION.ERROR.2, LABELS.17,
   LABELS.26, MACROLET.5, MACROLET.13, MACROLET.14, MACROLET.32,
   MACROLET.36, MACROLET.39, SYMBOL-MACROLET.3,
   SYMBOL-MACROLET.ERROR.1, SYMBOL-MACROLET.ERROR.2,
   SYMBOL-MACROLET.ERROR.3, MULTIPLE-VALUE-SETQ.5,
   MULTIPLE-VALUE-SETQ.8, LOOP-FINISH.ERROR.1, LOOP.1.50, LOOP.1.51,
   LOOP.1.53, LOOP.1.54, LOOP.1.55, LOOP.1.56, LOOP.7.18, LOOP.7.19,
   LOOP.7.20, LOOP.11.29, LOOP.11.30, LOOP.11.31, LOOP.11.32,
   LOOP.11.33, LOOP.11.34, CLASS-20.1, CLASS-20.2, CLASS-20.3,
   CLASS-21.1, CLASS-21.2, CLASS-21.4, CLASS-21.5, CLASS-23.3,
   CLASS-23.4, CLASS-24.2, CLASS-28.1, CLASS-28.2, CLASS-0203.1,
   CLASS-0203.2, CLASS-0221.1, CLASS-0221.2, CLASS-0221.3,
   CLASS-0309.1, CLASS-0310.1, DEFCLASS.FORWARD-REF.1,
   DEFCLASS.FORWARD-REF.2, DEFCLASS.FORWARD-REF.3,
   DEFCLASS.FORWARD-REF.4, ALLOCATE-INSTANCE.5,
   ALLOCATE-INSTANCE.ERROR.1, CHANGE-CLASS.1.7, CHANGE-CLASS.7.5,
   SLOT-MAKUNBOUND.1, SLOT-MAKUNBOUND.2, SLOT-MAKUNBOUND.ORDER.1,
   SLOT-MAKUNBOUND.ORDER.2, SLOT-MISSING.2, SLOT-MISSING.3,
   SLOT-MISSING.6, SLOT-MISSING.7, SLOT-MISSING.8, SLOT-UNBOUND.3,
   SLOT-UNBOUND.4, SLOT-UNBOUND.5, SLOT-UNBOUND.6,
   METHOD-QUALIFIERS.ERROR.1, METHOD-QUALIFIERS.ERROR.2,
   REMOVE-METHOD.1, MAKE-INSTANCES-OBSOLETE.2, MAKE-LOAD-FORM.4,
   MAKE-LOAD-FORM.5, MAKE-LOAD-FORM.6, MAKE-LOAD-FORM.7,
   MAKE-LOAD-FORM.8, MAKE-LOAD-FORM.9, MAKE-LOAD-FORM.10,
   MAKE-LOAD-FORM.11, MAKE-LOAD-FORM.12, MAKE-LOAD-FORM.ERROR.2,
   MAKE-LOAD-FORM-SAVING-SLOTS.1, MAKE-LOAD-FORM-SAVING-SLOTS.2,
   MAKE-LOAD-FORM-SAVING-SLOTS.3, MAKE-LOAD-FORM-SAVING-SLOTS.4,
   MAKE-LOAD-FORM-SAVING-SLOTS.5, MAKE-LOAD-FORM-SAVING-SLOTS.6,
   MAKE-LOAD-FORM-SAVING-SLOTS.7, MAKE-LOAD-FORM-SAVING-SLOTS.8,
   MAKE-LOAD-FORM-SAVING-SLOTS.9, MAKE-LOAD-FORM-SAVINGS-SLOTS.10,
   MAKE-LOAD-FORM-SAVINGS-SLOTS.11, MAKE-LOAD-FORM-SAVINGS-SLOTS.12,
   MAKE-LOAD-FORM-SAVING-SLOTS.ERROR.1,
   MAKE-LOAD-FORM-SAVING-SLOTS.ERROR.2,
   MAKE-LOAD-FORM-SAVING-SLOTS.ERROR.3, WITH-ACCESSORS.10,
   WITH-ACCESSORS.11, WITH-SLOTS.19, WITH-SLOTS.20, DEFGENERIC.ERROR.3,
   DEFGENERIC.ERROR.4, DEFGENERIC.ERROR.8, DEFGENERIC.ERROR.20,
   DEFGENERIC.ERROR.21, DEFGENERIC.2, DEFGENERIC.31, DEFGENERIC.32,
   DEFGENERIC.35, DEFGENERIC-METHOD-COMBINATION.+.10,
   DEFGENERIC-METHOD-COMBINATION.+.11,
   DEFGENERIC-METHOD-COMBINATION.APPEND.10,
   DEFGENERIC-METHOD-COMBINATION.APPEND.11,
   DEFGENERIC-METHOD-COMBINATION.APPEND.13,
   DEFGENERIC-METHOD-COMBINATION.NCONC.10,
   DEFGENERIC-METHOD-COMBINATION.NCONC.11,
   DEFGENERIC-METHOD-COMBINATION.LIST.10,
   DEFGENERIC-METHOD-COMBINATION.LIST.11,
   DEFGENERIC-METHOD-COMBINATION.MAX.10,
   DEFGENERIC-METHOD-COMBINATION.MAX.11,
   DEFGENERIC-METHOD-COMBINATION.MIN.10,
   DEFGENERIC-METHOD-COMBINATION.MIN.11,
   DEFGENERIC-METHOD-COMBINATION.AND.10,
   DEFGENERIC-METHOD-COMBINATION.AND.11,
   DEFGENERIC-METHOD-COMBINATION.OR.10,
   DEFGENERIC-METHOD-COMBINATION.OR.11,
   DEFGENERIC-METHOD-COMBINATION.PROGN.10,
   DEFGENERIC-METHOD-COMBINATION.PROGN.11, CALL-NEXT-METHOD.8,
   CALL-NEXT-METHOD.ERROR.1, CALL-NEXT-METHOD.ERROR.2,
   COMPUTE-APPLICABLE-METHODS.ERROR.1,
   COMPUTE-APPLICABLE-METHODS.ERROR.2,
   COMPUTE-APPLICABLE-METHODS.ERROR.3, DEFINE-METHOD-COMBINATION-01.4,
   DEFINE-METHOD-COMBINATION-05.1, FIND-METHOD.ERROR.1,
   FIND-METHOD.ERROR.2, FIND-METHOD.ERROR.3, FIND-METHOD.ERROR.4,
   FIND-METHOD.ERROR.7, FIND-METHOD.ERROR.8, FIND-METHOD.ERROR.9,
   FIND-METHOD.ERROR.10, ADD-METHOD.ERROR.4, ADD-METHOD.ERROR.5,
   ADD-METHOD.ERROR.6, ADD-METHOD.1, ADD-METHOD.2, UNBOUND-SLOT.1,
   UNBOUND-SLOT.2, CONDITION.2, CELL-ERROR-NAME.1, CELL-ERROR-NAME.2,
   CELL-ERROR-NAME.3, CELL-ERROR-NAME.4, CELL-ERROR-NAME.5,
   CELL-ERROR-NAME.6, CELL-ERROR-NAME.ERROR.1, CELL-ERROR-NAME.ERROR.2,
   ERROR.1, ERROR.2, ERROR.3, ERROR.4, ERROR.5, ERROR.8, CERROR.1,
   CERROR.2, CERROR.3, CERROR.4, CERROR.5, CHECK-TYPE.2, CHECK-TYPE.3,
   CHECK-TYPE.5, CHECK-TYPE.6, CHECK-TYPE.7, WARN.8, WARN.10, WARN.12,
   WARN.13, WARN.16, WARN.17, WARN.18, INVOKE-DEBUGGER.ERROR.1,
   INVOKE-DEBUGGER.ERROR.2, HANDLER-BIND.9, HANDLER-BIND.11,
   HANDLER-CASE.28, CONDITION-20-SLOTS.2, CONDITION-20-SLOTS.3,
   COMPUTE-RESTARTS.9, RESTART-CASE.29, RESTART-CASE.30,
   RESTART-CASE.31, CONTINUE.2, STORE-VALUE.2, USE-VALUE.2,
   RPLACA.ERROR.1, RPLACD.ERROR.1, SUBLIS.9, SUBLIS.10, NSUBLIS.10,
   NSUBLIS.11, ADJOIN.ERROR.10, REVAPPEND.ERROR.4, LAST.11, LAST.12,
   MAPC.ERROR.8, MAPCAR.ERROR.8, MAPCAN.ERROR.8, MAPL.ERROR.8,
   MAPLIST.ERROR.11, PAIRLIS.ERROR.6, GET-PROPERTIES.ERROR.4,
   SETF-GETF.ORDER.2, GETF.ERROR.4, GETF.ERROR.5,
   INTERSECTION.ERROR.11, INTERSECTION.ERROR.12,
   NINTERSECTION.ERROR.11, NINTERSECTION.ERROR.12, UNION.ERROR.11,
   UNION.ERROR.12, NUNION.ERROR.11, NUNION.ERROR.12,
   SET-DIFFERENCE.ERROR.11, SET-DIFFERENCE.ERROR.12,
   NSET-DIFFERENCE.ERROR.11, NSET-DIFFERENCE.ERROR.12,
   SET-EXCLUSIVE-OR.ERROR.11, SET-EXCLUSIVE-OR.ERROR.12,
   NSET-EXCLUSIVE-OR.ERROR.11, NSET-EXCLUSIVE-OR.ERROR.12,
   SUBSETP.ERROR.11, SUBSETP.ERROR.12, MAKE-ARRAY.DISPLACED.9,
   MAKE-ARRAY.DISPLACED.10, ADJUST-ARRAY.3, ADJUST-ARRAY.4,
   ADJUST-ARRAY.12, ADJUST-ARRAY.13, ADJUST-ARRAY.14, ADJUST-ARRAY.15,
   ADJUST-ARRAY.16, ADJUST-ARRAY.18, ADJUST-ARRAY.ADJUSTABLE.3,
   ADJUST-ARRAY.ADJUSTABLE.4, ADJUST-ARRAY.ADJUSTABLE.12,
   ADJUST-ARRAY.ADJUSTABLE.13, ADJUST-ARRAY.STRING.3,
   ADJUST-ARRAY.STRING.4, ADJUST-ARRAY.STRING.6,
   ADJUST-ARRAY.STRING.12, ADJUST-ARRAY.STRING.13,
   ADJUST-ARRAY.STRING.14, ADJUST-ARRAY.STRING.15,
   ADJUST-ARRAY.STRING.16, ADJUST-ARRAY.STRING.18,
   ADJUST-ARRAY.BIT-VECTOR.3, ADJUST-ARRAY.BIT-VECTOR.4,
   ADJUST-ARRAY.BIT-VECTOR.6, ADJUST-ARRAY.BIT-VECTOR.12,
   ADJUST-ARRAY.BIT-VECTOR.13, ADJUST-ARRAY.BIT-VECTOR.14,
   ADJUST-ARRAY.BIT-VECTOR.15, ADJUST-ARRAY.BIT-VECTOR.16,
   ADJUST-ARRAY.BIT-VECTOR.18, ARRAY-DISPLACEMENT.11,
   UPGRADED-ARRAY-ELEMENT-TYPE.2, UPGRADED-ARRAY-ELEMENT-TYPE.8,
   UPGRADED-ARRAY-ELEMENT-TYPE.NIL.1, VECTOR.3, VECTOR.6, VECTOR.8,
   HASH-TABLE.5, MAKE-HASH-TABLE.2, MAKE-HASH-TABLE.10,
   MAKE-HASH-TABLE.11, MAKE-HASH-TABLE.16, MAKE-HASH-TABLE.17,
   MAKE-HASH-TABLE.18, MAKE-HASH-TABLE.19, MAKE-HASH-TABLE.20,
   MAKE-HASH-TABLE.21, HASH-TABLE-COUNT.5, HASH-TABLE-COUNT.9,
   HASH-TABLE-SIZE.ERROR.3, HASH-TABLE-REHASH-SIZE.1,
   HASH-TABLE-REHASH-SIZE.2, HASH-TABLE-REHASH-SIZE.3,
   HASH-TABLE-REHASH-SIZE.ERROR.1, HASH-TABLE-REHASH-SIZE.ERROR.2,
   HASH-TABLE-REHASH-SIZE.ERROR.3, HASH-TABLE-REHASH-THRESHOLD.1,
   HASH-TABLE-REHASH-THRESHOLD.2, HASH-TABLE-REHASH-THRESHOLD.3,
   HASH-TABLE-REHASH-THRESHOLD.ERROR.1,
   HASH-TABLE-REHASH-THRESHOLD.ERROR.2,
   HASH-TABLE-REHASH-THRESHOLD.ERROR.3, HASH-TABLE-TEST.2,
   HASH-TABLE-TEST.3, HASH-TABLE-TEST.4, HASH-TABLE-TEST.ERROR.3,
   GETHASH.5, GETHASH.ORDER.4, GETHASH.ZERO.4, REMHASH.4, CLRHASH.4,
   MAPHASH.3, MAPHASH.6, WITH-HASH-TABLE-ITERATOR.4,
   WITH-HASH-TABLE-ITERATOR.7, SXHASH.8, FIND-ALL-SYMBOLS.2, INTERN.3,
   IN-PACKAGE.2, IN-PACKAGE.ERROR.1, IMPORT.5, =.17, =.18, /=.17,
   /=.18, <.17, <=.18, >.18, >=.17, BIGNUM.FLOAT.COMPARE.1A,
   BIGNUM.FLOAT.COMPARE.1B, BIGNUM.FLOAT.COMPARE.2A,
   BIGNUM.FLOAT.COMPARE.2B, BIGNUM.FLOAT.COMPARE.3A,
   BIGNUM.FLOAT.COMPARE.3B, BIGNUM.FLOAT.COMPARE.4A,
   BIGNUM.FLOAT.COMPARE.4B, FFLOOR.1, FFLOOR.10, FFLOOR.11, FFLOOR.12,
   FFLOOR.13, FCEILING.1, FCEILING.10, FCEILING.11, FCEILING.12,
   FCEILING.13, FTRUNCATE.1, FTRUNCATE.10, FTRUNCATE.11, FTRUNCATE.12,
   FTRUNCATE.13, FROUND.1, FROUND.10, FROUND.11, FROUND.12, FROUND.13,
   ASIN.6, ASIN.8, ACOS.6, ACOS.8, ATAN.2, ATAN.3, ATAN.6, ATAN.7,
   ATAN.8, ATAN.9, ATAN.11, ATAN.13, ASINH.2, ASINH.3, ASINH.5,
   ASINH.6, ATANH.2, ATANH.3, ATANH.5, ATANH.5A, ATANH.6, ATANH.7,
   SUBTRACT.3, /.ERROR.2, /.ERROR.3, /.ERROR.4, /.ERROR.5, /.ERROR.6,
   /.ERROR.7, /.ERROR.8, EXPT.18, EXPT.19, EXPT.20, EXPT.21, LCM.1,
   SQRT.5, SQRT.7, SQRT.8, SQRT.9, SQRT.11, ISQRT.ERROR.5, CIS.2,
   PHASE.1, ASH.5, LOGBITP.ERROR.4, FLOAT.5, RATIONAL.ERROR.4,
   RATIONALIZE.ERROR.4, ELT.1, ELT.1B, ELT.2, ELT.14, ELT-V.1,
   ELT-ADJ-ARRAY.1, ELT-DISPLACED-ARRAY.1, ELT-FILL-POINTER.3,
   ELT-FILL-POINTER.4, ELT-FILL-POINTER.6, ELT-FILL-POINTER.8,
   ARRAY-FILL-7, ARRAY-FILL-8, ARRAY-FILL-9, ARRAY-FILL-10,
   ARRAY-FIXNUM-FILL-7, ARRAY-FIXNUM-FILL-8, ARRAY-FIXNUM-FILL-9,
   ARRAY-FIXNUM-FILL-10, ARRAY-UNSIGNED-BYTE8-FILL-7,
   ARRAY-UNSIGNED-BYTE8-FILL-8, ARRAY-UNSIGNED-BYTE8-FILL-9,
   ARRAY-UNSIGNED-BYTE8-FILL-10, SUBSEQ.ORDER.3, SUBSEQ.ORDER.4,
   STRUCT-TEST-31/13, STRUCT-TEST-31/14, STRUCT-TEST-31/16,
   STRUCT-TEST-31/17, STRUCT-TEST-31/15A, STRUCT-TEST-31/15B,
   STRUCT-TEST-41/3, STRUCT-TEST-43/3, STRUCTS-ARE-DISJOINT, TYPES.3,
   TYPES.7B, TYPES.7C, TYPES.9, TYPES.9A,
   ALL-EXPORTED-CL-CLASS-NAMES-ARE-VALID,
   ALL-STANDARD-GENERIC-FUNCTIONS-ARE-INSTANCES-OF-THAT-CLASS,
   USER-CLASS-DISJOINTNESS, USER-CLASS-DISJOINTNESS-2,
   USER-STRUCT-DISJOINTNESS, TAC-3.16,
   UNIVERSE-ELEMENTS-IN-AT-MOST-ONE-DISJOINT-TYPE, COERCE.11,
   COERCE.21, COERCE.ERROR.4, COERCE.ERROR.9, SUBTYPEP.AND.1,
   SUBTYPEP.OR.1, SUBTYPEP.AND.3, SUBTYPEP.OR.3, SUBTYPEP.AND.4,
   SUBTYPEP.OR.4, SUBTYPEP.BIGNUM.INTEGER, SUBTYPEP.INTEGER.23,
   SUBTYPEP.INTEGER.24, SUBTYPEP.RATIONAL.12, SUBTYPEP.CONS.2,
   SUBTYPEP.CONS.12, SUBTYPEP.CONS.35, SUBTYPEP.CONS.36,
   SUBTYPEP.CONS.37, SUBTYPEP.MEMBER.17, SUBTYPEP.MEMBER.18,
   SUBTYPEP.EQL.1, SUBTYPEP.EQL.2, SUBTYPEP.ARRAY.1, SUBTYPEP.ARRAY.3,
   SUBTYPEP.ARRAY.4, SUBTYPEP.ARRAY.5, SUBTYPEP.ARRAY.8,
   VECTOR-OF-CHARACTER-IS-STRING.2, VECTOR-OF-CHARACTER-IS-STRING.4,
   VECTOR-OF-CHARACTER-IS-STRING.6,
   SIMPLE-1D-ARRAY-OF-CHARACTER-IS-SIMPLE-STRING.2,
   SIMPLE-1D-ARRAY-OF-CHARACTER-IS-SIMPLE-STRING.4,
   SIMPLE-1D-ARRAY-OF-CHARACTER-IS-SIMPLE-STRING.6,
   STANDARD-GENERIC-FUNCTION.1, STANDARD-GENERIC-FUNCTION.2, TYPE-OF.1,
   TYPE-OF.4, TYPE-OF.5, TYPE-OF.7, TYPE-OF.8, TYPE-OF.9,
   FLOATING-POINT-INEXACT-CPL, FLOATING-POINT-INVALID-OPERATION-CPL,
   PRINT-NOT-READABLE-CPL, READER-ERROR-CPL, STYLE-WARNING-CPL,
   UNBOUND-SLOT-CPL, COMPLEX-CPL.2, COMPLEX-CPL.3, FLOAT-CPL.2,
   FLOAT-CPL.3, FLOAT-CPL.4, FUNCTION-CPL, HASH-TABLE-CPL.1,
   HASH-TABLE-CPL.2, HASH-TABLE-CPL.3, INTEGER-CPL.2, INTEGER-CPL.3,
   LIST-CPL.2, NULL-CPL, PACKAGE-CPL, PATHNAME-CPL, RANDOM-STATE-CPL,
   READTABLE-CPL, STANDARD-GENERIC-FUNCTION-CPL, STRING-CPL.2,
   STRING.8, STRING.9, STRING.10, STRING.12, STRING.13,
   SIMPLE-STRING.7, SIMPLE-STRING.11, SIMPLE-STRING.12,
   SIMPLE-STRING.13, SIMPLE-STRING-P.8, SIMPLE-STRING-P.9, STRINGP.9,
   STRINGP.10, STRING-UPCASE.11, STRING-DOWNCASE.11,
   STRING-CAPITALIZE.11, NSTRING-UPCASE.11, NSTRING-DOWNCASE.11,
   NSTRING-CAPITALIZE.12, STRING-TRIM.20, STRING-LEFT-TRIM.20,
   STRING-RIGHT-TRIM.20, STRING=.NIL-ARRAY.1, STRING/=.NIL-ARRAY.1,
   STRING<.NIL-ARRAY.1, STRING<=.NIL-ARRAY.1, STRING>.NIL-ARRAY.1,
   STRING>=.NIL-ARRAY.1, STRING-EQUAL.NIL-ARRAY.1,
   STRING-NOT-EQUAL.NIL-ARRAY.1, STRING-LESSP.NIL-ARRAY.1,
   STRING-NOT-GREATERP.NIL-ARRAY.1, STRING-GREATERP.NIL-ARRAY.1,
   STRING-NOT-LESSP.NIL-ARRAY.1, DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2,
   PATHNAMES-PRINT-AND-READ-PROPERLY, MAKE-PATHNAME.5,
   MAKE-PATHNAME.12, MAKE-PATHNAME.13, MAKE-PATHNAME-ERROR-ABSOLUTE-UP,
   MAKE-PATHNAME-ERROR-ABSOLUTE-BACK,
   MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-UP,
   MAKE-PATHNAME-ERROR-ABSOLUTE-WILD-INFERIORS-BACK,
   MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-BACK, PATHNAME-HOST.2,
   PATHNAME-HOST.3, PATHNAME-HOST.4, PATHNAME-HOST.5, PATHNAME-HOST.6,
   PATHNAME-HOST.ERROR.2, PATHNAME-DEVICE.2, PATHNAME-DEVICE.3,
   PATHNAME-DEVICE.4, PATHNAME-DEVICE.5, PATHNAME-DEVICE.6,
   PATHNAME-DEVICE.ERROR.2, PATHNAME-DIRECTORY.2, PATHNAME-DIRECTORY.3,
   PATHNAME-DIRECTORY.4, PATHNAME-DIRECTORY.5, PATHNAME-DIRECTORY.6,
   PATHNAME-DIRECTORY.ERROR.2, PATHNAME-NAME.2, PATHNAME-NAME.3,
   PATHNAME-NAME.4, PATHNAME-NAME.5, PATHNAME-NAME.6,
   PATHNAME-NAME.ERROR.2, PATHNAME-TYPE.2, PATHNAME-TYPE.3,
   PATHNAME-TYPE.4, PATHNAME-TYPE.5, PATHNAME-TYPE.6,
   PATHNAME-TYPE.ERROR.2, PATHNAME-VERSION.ERROR.3,
   LOAD-LOGICAL-PATHNAME-TRANSLATIONS.1,
   LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.2,
   LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.3,
   LOGICAL-PATHNAME.ERROR.1, TRANSLATE-LOGICAL-PATHNAME.1,
   TRANSLATE-LOGICAL-PATHNAME.2, TRANSLATE-LOGICAL-PATHNAME.3,
   TRANSLATE-LOGICAL-PATHNAME.4, TRANSLATE-LOGICAL-PATHNAME.ERROR.1,
   WILD-PATHNAME-P.1, WILD-PATHNAME-P.2, WILD-PATHNAME-P.3,
   WILD-PATHNAME-P.4, WILD-PATHNAME-P.5, WILD-PATHNAME-P.6,
   WILD-PATHNAME-P.7, WILD-PATHNAME-P.8, WILD-PATHNAME-P.9,
   WILD-PATHNAME-P.10, WILD-PATHNAME-P.11, WILD-PATHNAME-P.12,
   WILD-PATHNAME-P.13, WILD-PATHNAME-P.14, WILD-PATHNAME-P.15,
   WILD-PATHNAME-P.16, WILD-PATHNAME-P.17, WILD-PATHNAME-P.18,
   WILD-PATHNAME-P.19, WILD-PATHNAME-P.20, WILD-PATHNAME-P.21,
   WILD-PATHNAME-P.22, WILD-PATHNAME-P.23, WILD-PATHNAME-P.24,
   WILD-PATHNAME-P.25, WILD-PATHNAME-P.26, WILD-PATHNAME-P.27,
   WILD-PATHNAME-P.28, WILD-PATHNAME-P.29, WILD-PATHNAME-P.30,
   WILD-PATHNAME-P.31, WILD-PATHNAME-P.ERROR.1,
   WILD-PATHNAME-P.ERROR.2, WILD-PATHNAME-P.ERROR.3, MERGE-PATHNAMES.2,
   MERGE-PATHNAMES.3, MERGE-PATHNAMES.4, MERGE-PATHNAMES.6,
   MERGE-PATHNAMES.7, DIRECTORY.3, DIRECTORY.4, DIRECTORY.5,
   DIRECTORY.8, PROBE-FILE.4, PROBE-FILE.ERROR.3, PROBE-FILE.ERROR.4,
   ENSURE-DIRECTORIES-EXIST.1, ENSURE-DIRECTORIES-EXIST.2,
   ENSURE-DIRECTORIES-EXIST.3, ENSURE-DIRECTORIES-EXIST.4,
   ENSURE-DIRECTORIES-EXIST.5, ENSURE-DIRECTORIES-EXIST.6,
   ENSURE-DIRECTORIES-EXIST.7, ENSURE-DIRECTORIES-EXIST.8,
   ENSURE-DIRECTORIES-EXIST.ERROR.1, ENSURE-DIRECTORIES-EXIST.ERROR.2,
   TRUENAME.5, TRUENAME.ERROR.3, TRUENAME.ERROR.4, TRUENAME.ERROR.5,
   TRUENAME.ERROR.6, FILE-AUTHOR.ERROR.3, FILE-AUTHOR.ERROR.4,
   FILE-WRITE-DATE.ERROR.3, FILE-WRITE-DATE.ERROR.4, RENAME-FILE.5,
   DELETE-FILE.ERROR.1, DELETE-FILE.ERROR.2, FILE-ERROR.1,
   FILE-ERROR-PATHNAME.4, INTERACTIVE-STREAM-P.1,
   INTERACTIVE-STREAM-P.ERROR.1, INTERACTIVE-STREAM-P.ERROR.2,
   INTERACTIVE-STREAM-P.ERROR.3, OPEN-STREAM-P.1, OPEN-STREAM-P.2,
   OPEN-STREAM-P.3, OPEN-STREAM-P.4, OPEN-STREAM-P.5,
   OPEN-STREAM-P.ERROR.1, OPEN-STREAM-P.ERROR.2, OPEN-STREAM-P.ERROR.3,
   STREAM-ELEMENT-TYPE.2, STREAM-ELEMENT-TYPE.3, STREAM-ELEMENT-TYPE.4,
   READ-BYTE.3, READ-BYTE.4, READ-BYTE.ERROR.2, READ-BYTE.ERROR.3,
   READ-BYTE.ERROR.4, PEEK-CHAR.17, PEEK-CHAR.ERROR.2,
   PEEK-CHAR.ERROR.3, PEEK-CHAR.ERROR.4, PEEK-CHAR.ERROR.5,
   READ-CHAR.ERROR.2, READ-CHAR.ERROR.3, READ-CHAR.ERROR.4,
   READ-CHAR-NO-HANG.6, READ-CHAR-NO-HANG.ERROR.2,
   READ-CHAR-NO-HANG.ERROR.3, READ-CHAR-NO-HANG.ERROR.4, READ-LINE.4,
   READ-LINE.5, READ-LINE.ERROR.2, READ-LINE.ERROR.3,
   READ-LINE.ERROR.4, WRITE-STRING.2, WRITE-LINE.2,
   READ-SEQUENCE.STRING.1, READ-SEQUENCE.STRING.2,
   READ-SEQUENCE.STRING.3, READ-SEQUENCE.STRING.4,
   READ-SEQUENCE.STRING.5, READ-SEQUENCE.STRING.6,
   READ-SEQUENCE.STRING.7, READ-SEQUENCE.STRING.8,
   READ-SEQUENCE.STRING.9, READ-SEQUENCE.STRING.10,
   READ-SEQUENCE.STRING.11, READ-SEQUENCE.STRING.12,
   READ-SEQUENCE.BASE-STRING.1, READ-SEQUENCE.BASE-STRING.2,
   READ-SEQUENCE.BASE-STRING.3, READ-SEQUENCE.BASE-STRING.4,
   READ-SEQUENCE.BASE-STRING.5, READ-SEQUENCE.BASE-STRING.6,
   READ-SEQUENCE.BASE-STRING.7, READ-SEQUENCE.LIST.1,
   READ-SEQUENCE.LIST.2, READ-SEQUENCE.LIST.3, READ-SEQUENCE.LIST.4,
   READ-SEQUENCE.LIST.5, READ-SEQUENCE.LIST.6, READ-SEQUENCE.LIST.7,
   READ-SEQUENCE.VECTOR.1, READ-SEQUENCE.VECTOR.2,
   READ-SEQUENCE.VECTOR.3, READ-SEQUENCE.VECTOR.4,
   READ-SEQUENCE.VECTOR.5, READ-SEQUENCE.VECTOR.6,
   READ-SEQUENCE.VECTOR.7, READ-SEQUENCE.FILL-VECTOR.1,
   READ-SEQUENCE.FILL-VECTOR.2, READ-SEQUENCE.FILL-VECTOR.3,
   READ-SEQUENCE.FILL-VECTOR.4, READ-SEQUENCE.FILL-VECTOR.5,
   READ-SEQUENCE.FILL-VECTOR.6, READ-SEQUENCE.FILL-VECTOR.7,
   READ-SEQUENCE.FILL-VECTOR.8, READ-SEQUENCE.NIL-VECTOR.1,
   READ-SEQUENCE.BV.1, READ-SEQUENCE.BV.2, READ-SEQUENCE.BV.3,
   READ-SEQUENCE.BV.4, READ-SEQUENCE.BV.5, READ-SEQUENCE.BV.6,
   READ-SEQUENCE.BV.7, READ-SEQUENCE.ERROR.1, READ-SEQUENCE.ERROR.2,
   READ-SEQUENCE.ERROR.3, READ-SEQUENCE.ERROR.4, READ-SEQUENCE.ERROR.5,
   READ-SEQUENCE.ERROR.6, READ-SEQUENCE.ERROR.7, READ-SEQUENCE.ERROR.8,
   READ-SEQUENCE.ERROR.9, READ-SEQUENCE.ERROR.10,
   READ-SEQUENCE.ERROR.11, WRITE-SEQUENCE.STRING.1,
   WRITE-SEQUENCE.STRING.2, WRITE-SEQUENCE.STRING.3,
   WRITE-SEQUENCE.STRING.4, WRITE-SEQUENCE.STRING.5,
   WRITE-SEQUENCE.STRING.6, WRITE-SEQUENCE.STRING.7,
   WRITE-SEQUENCE.STRING.8, WRITE-SEQUENCE.STRING.9,
   WRITE-SEQUENCE.STRING.10, WRITE-SEQUENCE.STRING.11,
   WRITE-SEQUENCE.STRING.12, WRITE-SEQUENCE.STRING.13,
   WRITE-SEQUENCE.LIST.1, WRITE-SEQUENCE.LIST.2, WRITE-SEQUENCE.LIST.3,
   WRITE-SEQUENCE.LIST.4, WRITE-SEQUENCE.LIST.5, WRITE-SEQUENCE.LIST.6,
   WRITE-SEQUENCE.LIST.7, WRITE-SEQUENCE.LIST.8,
   WRITE-SEQUENCE.SIMPLE-VECTOR.1, WRITE-SEQUENCE.SIMPLE-VECTOR.2,
   WRITE-SEQUENCE.SIMPLE-VECTOR.3, WRITE-SEQUENCE.SIMPLE-VECTOR.4,
   WRITE-SEQUENCE.SIMPLE-VECTOR.5, WRITE-SEQUENCE.SIMPLE-VECTOR.6,
   WRITE-SEQUENCE.SIMPLE-VECTOR.7, WRITE-SEQUENCE.SIMPLE-VECTOR.8,
   WRITE-SEQUENCE.FILL-VECTOR.1, WRITE-SEQUENCE.FILL-VECTOR.2,
   WRITE-SEQUENCE.FILL-VECTOR.3, WRITE-SEQUENCE.FILL-VECTOR.4,
   WRITE-SEQUENCE.FILL-VECTOR.5, WRITE-SEQUENCE.FILL-VECTOR.6,
   WRITE-SEQUENCE.FILL-VECTOR.7, WRITE-SEQUENCE.BV.1,
   WRITE-SEQUENCE.BV.2, WRITE-SEQUENCE.BV.3, WRITE-SEQUENCE.BV.4,
   WRITE-SEQUENCE.BV.5, WRITE-SEQUENCE.BV.6, WRITE-SEQUENCE.ERROR.1,
   WRITE-SEQUENCE.ERROR.2, WRITE-SEQUENCE.ERROR.3,
   WRITE-SEQUENCE.ERROR.4, WRITE-SEQUENCE.ERROR.5,
   WRITE-SEQUENCE.ERROR.6, WRITE-SEQUENCE.ERROR.7,
   WRITE-SEQUENCE.ERROR.8, WRITE-SEQUENCE.ERROR.9,
   WRITE-SEQUENCE.ERROR.10, WRITE-SEQUENCE.ERROR.11,
   WRITE-SEQUENCE.ERROR.12, WRITE-SEQUENCE.ERROR.13,
   FILE-LENGTH.ERROR.3, FILE-LENGTH.ERROR.4, FILE-LENGTH.ERROR.5,
   FILE-LENGTH.ERROR.6, FILE-LENGTH.ERROR.8, FILE-LENGTH.ERROR.9,
   FILE-LENGTH.ERROR.10, FILE-LENGTH.ERROR.11, FILE-LENGTH.ERROR.12,
   FILE-LENGTH2, FILE-LENGTH.3, FILE-LENGTH.4, FILE-LENGTH.5,
   FILE-POSITION.6, FILE-STRING-LENGTH.1, FILE-STRING-LENGTH.2,
   FILE-STRING-LENGTH.ERROR.1, FILE-STRING-LENGTH.ERROR.2,
   FILE-STRING-LENGTH.ERROR.3, OPEN.1, OPEN.2, OPEN.3, OPEN.4, OPEN.5,
   OPEN.6, OPEN.7, OPEN.8, OPEN.9, OPEN.10, OPEN.11, OPEN.12, OPEN.13,
   OPEN.14, OPEN.15, OPEN.16, OPEN.17, OPEN.18, OPEN.19, OPEN.20,
   OPEN.21, OPEN.22, OPEN.23, OPEN.24, OPEN.25, OPEN.26, OPEN.27,
   OPEN.28, OPEN.29, OPEN.30, OPEN.31, OPEN.32, OPEN.33, OPEN.34,
   OPEN.35, OPEN.36, OPEN.37, OPEN.38, OPEN.39, OPEN.40, OPEN.41,
   OPEN.42, OPEN.43, OPEN.44, OPEN.45, OPEN.46, OPEN.47, OPEN.48,
   OPEN.49, OPEN.50, OPEN.51, OPEN.52, OPEN.53, OPEN.54, OPEN.55,
   OPEN.56, OPEN.57, OPEN.58, OPEN.59, OPEN.60, OPEN.61, OPEN.62,
   OPEN.63, OPEN.64, OPEN.65, OPEN.67, OPEN.OUTPUT.1, OPEN.OUTPUT.2,
   OPEN.OUTPUT.3, OPEN.OUTPUT.4, OPEN.OUTPUT.5, OPEN.OUTPUT.6,
   OPEN.OUTPUT.7, OPEN.OUTPUT.8, OPEN.OUTPUT.9, OPEN.OUTPUT.10,
   OPEN.OUTPUT.11, OPEN.OUTPUT.12, OPEN.OUTPUT.13, OPEN.OUTPUT.14,
   OPEN.OUTPUT.15, OPEN.OUTPUT.16, OPEN.OUTPUT.17, OPEN.OUTPUT.18,
   OPEN.OUTPUT.19, OPEN.OUTPUT.21, OPEN.OUTPUT.22, OPEN.OUTPUT.23,
   OPEN.OUTPUT.24, OPEN.OUTPUT.25, OPEN.OUTPUT.26, OPEN.OUTPUT.27,
   OPEN.OUTPUT.28A, OPEN.OUTPUT.29, OPEN.OUTPUT.31, OPEN.OUTPUT.32,
   OPEN.OUTPUT.33, OPEN.OUTPUT.34, OPEN.OUTPUT.35, OPEN.IO.1,
   OPEN.IO.2, OPEN.IO.3, OPEN.IO.4, OPEN.IO.5, OPEN.IO.6, OPEN.IO.7,
   OPEN.IO.8, OPEN.IO.9, OPEN.IO.10, OPEN.IO.11, OPEN.IO.12,
   OPEN.IO.13, OPEN.IO.14, OPEN.IO.15, OPEN.IO.16, OPEN.IO.17,
   OPEN.IO.18, OPEN.IO.19, OPEN.IO.21, OPEN.IO.22, OPEN.IO.23,
   OPEN.IO.24, OPEN.IO.25, OPEN.IO.26, OPEN.IO.27, OPEN.IO.28A,
   OPEN.IO.29, OPEN.IO.31, OPEN.IO.32, OPEN.IO.33, OPEN.IO.34,
   OPEN.IO.35, OPEN.PROBE.1, OPEN.PROBE.2, OPEN.PROBE.3, OPEN.PROBE.4,
   OPEN.PROBE.5, OPEN.PROBE.6, OPEN.PROBE.7, OPEN.PROBE.8,
   OPEN.PROBE.9, OPEN.PROBE.10, OPEN.PROBE.11, OPEN.PROBE.23,
   OPEN.PROBE.24, OPEN.PROBE.25, OPEN.PROBE.26, OPEN.PROBE.27,
   OPEN.PROBE.28, OPEN.PROBE.29, OPEN.PROBE.30, OPEN.PROBE.31,
   OPEN.PROBE.32, OPEN.PROBE.33, OPEN.PROBE.34, OPEN.PROBE.35,
   OPEN.PROBE.36, OPEN.ERROR.1, OPEN.ERROR.2, OPEN.ERROR.3,
   OPEN.ERROR.4, OPEN.ERROR.5, OPEN.ERROR.6, OPEN.ERROR.7,
   OPEN.ERROR.8, OPEN.ERROR.9, OPEN.ERROR.10, OPEN.ERROR.11,
   OPEN.ERROR.12, OPEN.ERROR.13, OPEN.ERROR.14, OPEN.ERROR.15,
   OPEN.ERROR.16, OPEN.ERROR.17, STREAM-EXTERNAL-FORMAT.ERROR.1,
   STREAM-EXTERNAL-FORMAT.ERROR.2, LISTEN.5, LISTEN.7,
   MAKE-SYNONYM-STREAM.1, MAKE-SYNONYM-STREAM.3, MAKE-SYNONYM-STREAM.4,
   SYNONYM-STREAM-SYMBOL.1, SYNONYM-STREAM-SYMBOL.ERROR.1,
   SYNONYM-STREAM-SYMBOL.ERROR.2, MAKE-BROADCAST-STREAM.1,
   MAKE-BROADCAST-STREAM.2, MAKE-BROADCAST-STREAM.3,
   MAKE-BROADCAST-STREAM.4, MAKE-BROADCAST-STREAM.5,
   MAKE-BROADCAST-STREAM.6, MAKE-BROADCAST-STREAM.7,
   MAKE-BROADCAST-STREAM.8, MAKE-BROADCAST-STREAM.ERROR.1,
   MAKE-BROADCAST-STREAM.ERROR.2, BROADCAST-STREAM-STREAMS.1,
   BROADCAST-STREAM-STREAMS.2, BROADCAST-STREAM-STREAMS.ERROR.1,
   BROADCAST-STREAM-STREAMS.ERROR.2, MAKE-TWO-WAY-STREAM.1,
   MAKE-TWO-WAY-STREAM.2, MAKE-TWO-WAY-STREAM.4,
   MAKE-TWO-WAY-STREAM.11, MAKE-TWO-WAY-STREAM.12,
   MAKE-TWO-WAY-STREAM.13, MAKE-TWO-WAY-STREAM.ERROR.4,
   MAKE-TWO-WAY-STREAM.ERROR.6, MAKE-TWO-WAY-STREAM.ERROR.7,
   TWO-WAY-STREAM-INPUT-STREAM.1, TWO-WAY-STREAM-INPUT-STREAM.ERROR.1,
   TWO-WAY-STREAM-INPUT-STREAM.ERROR.2, TWO-WAY-STREAM-OUTPUT-STREAM.1,
   TWO-WAY-STREAM-OUTPUT-STREAM.ERROR.1,
   TWO-WAY-STREAM-OUTPUT-STREAM.ERROR.2, ECHO-STREAM-INPUT-STREAM.1,
   ECHO-STREAM-INPUT-STREAM.ERROR.1, ECHO-STREAM-INPUT-STREAM.ERROR.2,
   ECHO-STREAM-OUTPUT-STREAM.1, ECHO-STREAM-OUTPUT-STREAM.ERROR.1,
   ECHO-STREAM-OUTPUT-STREAM.ERROR.2, MAKE-ECHO-STREAM.7,
   MAKE-ECHO-STREAM.8, MAKE-ECHO-STREAM.9, MAKE-ECHO-STREAM.10,
   MAKE-ECHO-STREAM.12, MAKE-ECHO-STREAM.15, MAKE-ECHO-STREAM.16,
   CONCATENATED-STREAM-STREAMS.1, CONCATENATED-STREAM-STREAMS.2,
   CONCATENATED-STREAM-STREAMS.3, CONCATENATED-STREAM-STREAMS.4,
   CONCATENATED-STREAM-STREAMS.5, CONCATENATED-STREAM-STREAMS.ERROR.1,
   CONCATENATED-STREAM-STREAMS.ERROR.2, MAKE-CONCATENATED-STREAM.6,
   MAKE-CONCATENATED-STREAM.7, MAKE-CONCATENATED-STREAM.15,
   MAKE-CONCATENATED-STREAM.16, MAKE-CONCATENATED-STREAM.21,
   MAKE-CONCATENATED-STREAM.22, MAKE-CONCATENATED-STREAM.23,
   MAKE-CONCATENATED-STREAM.24, MAKE-CONCATENATED-STREAM.26,
   MAKE-CONCATENATED-STREAM.27, MAKE-CONCATENATED-STREAM.30,
   MAKE-STRING-INPUT-STREAM.10, MAKE-STRING-OUTPUT-STREAM.1,
   MAKE-STRING-OUTPUT-STREAM.2, MAKE-STRING-OUTPUT-STREAM.3,
   MAKE-STRING-OUTPUT-STREAM.4, MAKE-STRING-OUTPUT-STREAM.5,
   MAKE-STRING-OUTPUT-STREAM.6, MAKE-STRING-OUTPUT-STREAM.7,
   MAKE-STRING-OUTPUT-STREAM.9, MAKE-STRING-OUTPUT-STREAM.10,
   MAKE-STRING-OUTPUT-STREAM.11, MAKE-STRING-OUTPUT-STREAM.12,
   MAKE-STRING-OUTPUT-STREAM.13, WITH-INPUT-FROM-STRING.9,
   WITH-INPUT-FROM-STRING.10, WITH-INPUT-FROM-STRING.11,
   WITH-INPUT-FROM-STRING.12, WITH-INPUT-FROM-STRING.13,
   WITH-INPUT-FROM-STRING.14, WITH-INPUT-FROM-STRING.15,
   WITH-INPUT-FROM-STRING.16, WITH-OUTPUT-TO-STRING.4,
   WITH-OUTPUT-TO-STRING.7, WITH-OUTPUT-TO-STRING.8,
   WITH-OUTPUT-TO-STRING.9, STREAM-ERROR-STREAM.1,
   STREAM-ERROR-STREAM.ERROR.1, STREAM-ERROR-STREAM.ERROR.2,
   COPY-PPRINT-DISPATCH.1, COPY-PPRINT-DISPATCH.2,
   COPY-PPRINT-DISPATCH.3, COPY-PPRINT-DISPATCH.4,
   COPY-PPRINT-DISPATCH.5, COPY-PPRINT-DISPATCH.6,
   COPY-PPRINT-DISPATCH.7, COPY-PPRINT-DISPATCH.8,
   COPY-PPRINT-DISPATCH.ERROR.1, COPY-PPRINT-DISPATCH.ERROR.2,
   PRINT.SHORT-FLOAT.RANDOM, PRINT.SINGLE-FLOAT.RANDOM,
   PRINT.DOUBLE-FLOAT.RANDOM, PRINT.LONG-FLOAT.RANDOM, PRINT.CHAR.4,
   PRINT.CHAR.7, PRINT.CHAR.8, PRINT.CHAR.9, PRINT.CHAR.10,
   PRINT.SYMBOL.1, PRINT.SYMBOL.2, PRINT.SYMBOL.3, PRINT.SYMBOL.4,
   PRINT.SYMBOL.5, PRINT.SYMBOL.6, PRINT.SYMBOL.7, PRINT.SYMBOL.8,
   PRINT.SYMBOL.9, PRINT.SYMBOL.10, PRINT.SYMBOL.11, PRINT.SYMBOL.12,
   PRINT.SYMBOL.RANDOM.3, PRINT.SYMBOL.RANDOM.4, PRIN1.SYMBOL.1,
   PRIN1.SYMBOL.2, PRIN1.SYMBOL.3, PRINT.SYMBOL.PREFIX.1,
   PRINT.SYMBOL.PREFIX.2, PRINT.SYMBOL.PREFIX.3, PRINT.SYMBOL.PREFIX.4,
   PRINT.SYMBOL.PREFIX.5, PRINT.SYMBOL.PREFIX.6,
   PRINT.SYMBOL.PREFIX.6A, PRINT.SYMBOL.PREFIX.6B,
   PRINT.SYMBOL.PREFIX.7, PRINT.SYMBOL.PREFIX.8, PRINT.SYMBOL.PREFIX.9,
   PRINT.SYMBOL.PREFIX.10, PRINT.STRING.1, PRINT.STRING.2,
   PRINT.STRING.3, PRINT.STRING.4, PRINT.STRING.5, PRINT.STRING.6,
   PRINT.STRING.7, PRINT.STRING.8, PRINT.STRING.9, PRINT.STRING.10,
   PRINT.STRING.11, PRINT.STRING.12, PRINT.STRING.13,
   PRINT.STRING.NIL.1, PRINT.STRING.NIL.2, PRINT.CONS.5, PRINT.CONS.6,
   PRINT.CONS.7, PRINT.CONS.RANDOM.1, PRINT.BIT-VECTOR.1,
   PRINT.BIT-VECTOR.2, PRINT.BIT-VECTOR.3, PRINT.BIT-VECTOR.4,
   PRINT.BIT-VECTOR.5, PRINT.BIT-VECTOR.6, PRINT.BIT-VECTOR.7,
   PRINT.VECTOR.1, PRINT.VECTOR.2, PRINT.VECTOR.3, PRINT.VECTOR.4,
   PRINT.VECTOR.5, PRINT.VECTOR.6, PRINT.VECTOR.7, PRINT.VECTOR.FILL.1,
   PRINT.VECTOR.FILL.2, PRINT.VECTOR.FILL.3, PRINT.VECTOR.DISPLACED.1,
   PRINT.VECTOR.DISPLACED.2, PRINT.VECTOR.DISPLACED.3,
   PRINT.VECTOR.ADJUSTABLE.1, PRINT.VECTOR.ADJUSTABLE.2,
   PRINT.VECTOR.ADJUSTABLE.3, PRINT.VECTOR.UNREADABLE.1,
   PRINT.VECTOR.UNREADABLE.2, PRINT.VECTOR.UNREADABLE.3,
   PRINT.VECTOR.RANDOM.1, PRINT.VECTOR.RANDOM.4, PRINT.VECTOR.LENGTH.1,
   PRINT.VECTOR.LENGTH.2, PRINT.VECTOR.LENGTH.3, PRINT.VECTOR.LENGTH.4,
   PRINT.VECTOR.LENGTH.5, PRINT.VECTOR.LENGTH.6, PRINT.VECTOR.LENGTH.7,
   PRINT.VECTOR.LENGTH.8, PRINT.VECTOR.LENGTH.9, PRINT.VECTOR.LEVEL.1,
   PRINT.VECTOR.LEVEL.2, PRINT.VECTOR.LEVEL.3, PRINT.VECTOR.LEVEL.4,
   PRINT.VECTOR.LEVEL.5, PRINT.VECTOR.LEVEL.6, PRINT.ARRAY.0.1,
   PRINT.ARRAY.0.2, PRINT.ARRAY.0.3, PRINT.ARRAY.0.4, PRINT.ARRAY.0.5,
   PRINT.ARRAY.0.6, PRINT.ARRAY.0.13, PRINT.ARRAY.0.14,
   PRINT.ARRAY.0.15, PRINT.ARRAY.0.16, PRINT.ARRAY.0.17,
   PRINT.ARRAY.2.1, PRINT.ARRAY.2.2, PRINT.ARRAY.2.3, PRINT.ARRAY.2.4,
   PRINT.ARRAY.2.5, PRINT.ARRAY.2.6, PRINT.ARRAY.2.7, PRINT.ARRAY.2.8,
   PRINT.ARRAY.2.9, PRINT.ARRAY.2.10, PRINT.ARRAY.2.11,
   PRINT.ARRAY.2.12, PRINT.ARRAY.2.13, PRINT.ARRAY.2.14,
   PRINT.ARRAY.2.15, PRINT.ARRAY.2.16, PRINT.ARRAY.2.17,
   PRINT.ARRAY.2.20, PRINT.ARRAY.2.21, PRINT.ARRAY.2.22,
   PRINT.ARRAY.2.23, PRINT.ARRAY.2.27, PRINT.ARRAY.2.28,
   PRINT.ARRAY.2.29, PRINT.ARRAY.2.30, PRINT.ARRAY.2.31,
   PRINT.ARRAY.3.1, PRINT.ARRAY.MULTI-DIM.1, PRINT.ARRAY.MULTI-DIM.2,
   PRINT.RANDOM-STATE.1, PRINT.PATHNAME.1, PRINT.PATHNAME.2,
   PRINT-STRUCTURE.1, PRINT-LINES.INIT.1, PRINT-READABLY.INIT.1,
   PRINT-RIGHT-MARGIN.INIT.1, PPRINT-DISPATCH.1, PPRINT-DISPATCH.3,
   PPRINT-DISPATCH.4, PPRINT-DISPATCH.5, PPRINT-DISPATCH.6,
   PPRINT-DISPATCH.7, PPRINT-DISPATCH.8, PPRINT-DISPATCH.9,
   PPRINT-DISPATCH.ERROR.1, PPRINT-DISPATCH.ERROR.2,
   SET-PPRINT-DISPATCH.ERROR.1, SET-PPRINT-DISPATCH.ERROR.2,
   SET-PPRINT-DISPATCH.ERROR.3, PPRINT-FILL.1, PPRINT-FILL.2,
   PPRINT-FILL.3, PPRINT-FILL.4, PPRINT-FILL.5, PPRINT-FILL.6,
   PPRINT-FILL.7, PPRINT-FILL.8, PPRINT-FILL.9, PPRINT-FILL.10,
   PPRINT-FILL.11, PPRINT-FILL.12, PPRINT-FILL.13, PPRINT-FILL.14,
   PPRINT-FILL.15, PPRINT-FILL.RETURN-VALUES.1,
   PPRINT-FILL.RETURN-VALUES.2, PPRINT-FILL.ERROR.1,
   PPRINT-FILL.ERROR.2, PPRINT-FILL.ERROR.3, PPRINT-LINEAR.1,
   PPRINT-LINEAR.2, PPRINT-LINEAR.3, PPRINT-LINEAR.4, PPRINT-LINEAR.5,
   PPRINT-LINEAR.6, PPRINT-LINEAR.7, PPRINT-LINEAR.8, PPRINT-LINEAR.9,
   PPRINT-LINEAR.10, PPRINT-LINEAR.11, PPRINT-LINEAR.12,
   PPRINT-LINEAR.13, PPRINT-LINEAR.14, PPRINT-LINEAR.ERROR.1,
   PPRINT-LINEAR.ERROR.2, PPRINT-LINEAR.ERROR.3, PPRINT-TABULAR.1,
   PPRINT-TABULAR.2, PPRINT-TABULAR.3, PPRINT-TABULAR.4,
   PPRINT-TABULAR.5, PPRINT-TABULAR.6, PPRINT-TABULAR.7,
   PPRINT-TABULAR.8, PPRINT-TABULAR.9, PPRINT-TABULAR.10,
   PPRINT-TABULAR.11, PPRINT-TABULAR.12, PPRINT-TABULAR.13,
   PPRINT-TABULAR.14, PPRINT-TABULAR.15, PPRINT-TABULAR.16,
   PPRINT-TABULAR.17, PPRINT-TABULAR.18, PPRINT-TABULAR.19,
   PPRINT-TABULAR.20, PPRINT-TABULAR.21, PPRINT-TABULAR.22,
   PPRINT-TABULAR.23, PPRINT-TABULAR.24,
   PPRINT-TABULAR.RETURN-VALUES.1, PPRINT-TABULAR.RETURN-VALUES.2,
   PPRINT-TABULAR.ERROR.1, PPRINT-TABULAR.ERROR.2,
   PPRINT-TABULAR.ERROR.3, PPRINT-TABULAR.ERROR.4, PPRINT-INDENT.1,
   PPRINT-INDENT.2, PPRINT-INDENT.3, PPRINT-INDENT.4, PPRINT-INDENT.5,
   PPRINT-INDENT.6, PPRINT-INDENT.7, PPRINT-INDENT.8, PPRINT-INDENT.9,
   PPRINT-INDENT.10, PPRINT-INDENT.11, PPRINT-INDENT.12,
   PPRINT-INDENT.13, PPRINT-INDENT.13A, PPRINT-INDENT.14,
   PPRINT-INDENT.15, PPRINT-INDENT.16, PPRINT-INDENT.17,
   PPRINT-INDENT.18, PPRINT-INDENT.19, PPRINT-INDENT.20,
   PPRINT-INDENT.21, PPRINT-INDENT.22, PPRINT-INDENT.23,
   PPRINT-INDENT.ERROR.1, PPRINT-INDENT.ERROR.2, PPRINT-INDENT.ERROR.3,
   PPRINT-LOGICAL-BLOCK.1, PPRINT-LOGICAL-BLOCK.2,
   PPRINT-LOGICAL-BLOCK.3, PPRINT-LOGICAL-BLOCK.4,
   PPRINT-LOGICAL-BLOCK.5, PPRINT-LOGICAL-BLOCK.6,
   PPRINT-LOGICAL-BLOCK.7, PPRINT-LOGICAL-BLOCK.8,
   PPRINT-LOGICAL-BLOCK.9, PPRINT-LOGICAL-BLOCK.10,
   PPRINT-LOGICAL-BLOCK.11, PPRINT-LOGICAL-BLOCK.12,
   PPRINT-LOGICAL-BLOCK.13, PPRINT-LOGICAL-BLOCK.14,
   PPRINT-LOGICAL-BLOCK.16, PPRINT-LOGICAL-BLOCK.17,
   PPRINT-LOGICAL-BLOCK.ERROR.1, PPRINT-LOGICAL-BLOCK.ERROR.2,
   PPRINT-LOGICAL-BLOCK.ERROR.3, PPRINT-EXIT-IF-LIST-EXHAUSTED.1,
   PPRINT-EXIT-IF-LIST-EXHAUSTED.2, PPRINT-EXIT-IF-LIST-EXHAUSTED.3,
   PPRINT-EXIT-IF-LIST-EXHAUSTED.4, PPRINT-POP.1, PPRINT-POP.2,
   PPRINT-POP.3, PPRINT-POP.4, PPRINT-POP.5, PPRINT-POP.6,
   PPRINT-POP.7, PPRINT-POP.8, PPRINT-POP.9, PPRINT-NEWLINE.1,
   PPRINT-NEWLINE.2, PPRINT-NEWLINE.3, PPRINT-NEWLINE.LINEAR.1,
   PPRINT-NEWLINE.LINEAR.2, PPRINT-NEWLINE.LINEAR.3,
   PPRINT-NEWLINE.LINEAR.4, PPRINT-NEWLINE.LINEAR.5,
   PPRINT-NEWLINE.LINEAR.6, PPRINT-NEWLINE.LINEAR.7,
   PPRINT-NEWLINE.LINEAR.8, PPRINT-NEWLINE.LINEAR.9,
   PPRINT-NEWLINE.LINEAR.10, PPRINT-NEWLINE.MISER.1,
   PPRINT-NEWLINE.MISER.2, PPRINT-NEWLINE.MISER.3,
   PPRINT-NEWLINE.MISER.4, PPRINT-NEWLINE.MISER.5,
   PPRINT-NEWLINE.MISER.6, PPRINT-NEWLINE.MISER.7,
   PPRINT-NEWLINE.MISER.8, PPRINT-NEWLINE.MISER.9,
   PPRINT-NEWLINE.MISER.10, PPRINT-NEWLINE.MISER.11,
   PPRINT-NEWLINE.MISER.12, PPRINT-NEWLINE.MISER.13,
   PPRINT-NEWLINE.FILL.1, PPRINT-NEWLINE.FILL.2, PPRINT-NEWLINE.FILL.3,
   PPRINT-NEWLINE.FILL.4, PPRINT-NEWLINE.FILL.5, PPRINT-NEWLINE.FILL.6,
   PPRINT-NEWLINE.FILL.7, PPRINT-NEWLINE.FILL.8, PPRINT-NEWLINE.FILL.9,
   PPRINT-NEWLINE.FILL.10, PPRINT-NEWLINE.MANDATORY.1,
   PPRINT-NEWLINE.MANDATORY.2, PPRINT-NEWLINE.MANDATORY.3,
   PPRINT-NEWLINE.MANDATORY.4, PPRINT-NEWLINE.MANDATORY.5,
   PPRINT-NEWLINE.MANDATORY.6, PPRINT-NEWLINE.ERROR.1,
   PPRINT-NEWLINE.ERROR.2, PPRINT-NEWLINE.ERROR.3,
   PPRINT-TAB.NON-PRETTY.1, PPRINT-TAB.NON-PRETTY.2,
   PPRINT-TAB.NON-PRETTY.3, PPRINT-TAB.NON-PRETTY.4,
   PPRINT-TAB.NON-PRETTY.5, PPRINT-TAB.NON-PRETTY.6,
   PPRINT-TAB.NON-PRETTY.7, PPRINT-TAB.NON-PRETTY.8, PPRINT-TAB.NIL.1,
   PPRINT-TAB.T.1, PPRINT-TAB.LINE.1, PPRINT-TAB.SECTION.1,
   PPRINT-TAB.LINE-RELATIVE.1, PPRINT-TAB.SECTION-RELATIVE.1,
   PPRINT-TAB.ERROR.1, PPRINT-TAB.ERROR.2, PPRINT-TAB.ERROR.3,
   PPRINT-TAB.ERROR.4, PRINT-UNREADABLE-OBJECT.1,
   PRINT-UNREADABLE-OBJECT.2, PRINT-UNREADABLE-OBJECT.3,
   PRINT-UNREADABLE-OBJECT.4, PRINT-UNREADABLE-OBJECT.ERROR.1,
   PRINT-UNREADABLE-OBJECT.T.1, PRINT-UNREADABLE-OBJECT.NIL.1, WRITE.1,
   WITH-STANDARD-IO-SYNTAX.10, WITH-STANDARD-IO-SYNTAX.11,
   WITH-STANDARD-IO-SYNTAX.13, WITH-STANDARD-IO-SYNTAX.16,
   DISASSEMBLE.1, DISASSEMBLE.2, DISASSEMBLE.3, DISASSEMBLE.4,
   DISASSEMBLE.5, DISASSEMBLE.6, DISASSEMBLE.7, MISC.89, MISC.94,
   MISC.103, MISC.109, MISC.238A.

It looks like the pretty printer also needs a lot of work.  Some of the printer 
control variables aren't
defined:

>(compile-file "printer-aux.lsp")

; (DEFUN OUTPUT-TEST ...) is being compiled.
;; The variable *PRINT-LINES* is undefined.
;; The compiler will assume this variable is a global.
;; The variable *PRINT-MISER-WIDTH* is undefined.
;; The compiler will assume this variable is a global.
;; The variable *PRINT-PPRINT-DISPATCH* is undefined.
;; The compiler will assume this variable is a global.
;; The variable *PRINT-RIGHT-MARGIN* is undefined.
;; The compiler will assume this variable is a global.
#p"printer-aux.o"

>


        Paul




reply via email to

[Prev in Thread] Current Thread [Next in Thread]