;System System made by gjc at 21-May-86 17:28:07 -*-Mode: Lisp; Package: User; Base: 10-*- ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: DEBUGGER; ERRMAC LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: IO; DLEDIT LISP >" '((:COMPILE NIL (SI::FIND-V2-BAND NIL NIL (COMPILER::WRONG-NUMBER-OF-ARGUMENTS :OBSOLETE NIL "~S called with multiple value arguments~% ~ use ~S instead." RETURN (RETURN (VALUES (SYSTEM:GET-DISK-STRING SI::RQB SI::LOC 4) SI::LOC)))) (SI::PRINT-DISK-LABEL-FROM-RQB-V2 NIL NIL (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." SI::UNIT)) (SI:EDIT-DISK-LABEL NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT)) (PRINT-DISK-LABEL NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT)) (SI:CURRENT-BAND NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT)) (SI:CURRENT-MICROLOAD NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT)) (SET-CURRENT-BAND NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT)) (SET-CURRENT-MICROLOAD NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" SI::DEFAULT-DISK-UNIT))))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS2; MAKSYS LISP >" '((:COMPILE NIL (SI::LOAD-FONT-WIDTHS-1 NIL NIL (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" PRESS:LOAD-FONT-WIDTHS))))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS2; PATCH LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS2; QTRACE LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS; STORAGE LISP >" '((:COMPILE NIL (SYSTEM:RESET-TEMPORARY-AREA NIL NIL (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." SI::INHIBIT) (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." SI::AREA)) (SI::AREA-TEMPORARY-P NIL NIL (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." SI::AREA)) (SI::AREA-TEMPORARY? NIL NIL (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." SI::AREA))))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: NETWORK; TABLE LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: IO; FORMAT LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: NETWORK; CHAOS; CHSNCP LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: NETWORK; CHAOS; CHUSE LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: NETWORK; CHAOS; CHSAUX LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS; CONFIG-DEFS LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS; QCFILE LISP >" '((:COMPILE NIL ((:SPECIAL-FORM COMPILER::PATCH-SOURCE-FILE) NIL NIL (COMPILER::FUNCTION-NOT-VALID :OBSOLETE NIL "(DEFUN ~S ...) has "E in argument list. New special forms should be macros" COMPILER::PATCH-SOURCE-FILE) (SI::PREMATURE-WARNING-MARKER NIL NIL "The problems described above were in data preceding the definition of ~S." (:SPECIAL-FORM COMPILER::PATCH-SOURCE-FILE))) ((:SPECIAL-FORM SPECIAL) NIL NIL (COMPILER::FUNCTION-NOT-VALID :OBSOLETE NIL "(DEFUN ~S ...) has "E in argument list. New special forms should be macros" SPECIAL) (SI::PREMATURE-WARNING-MARKER NIL NIL "The problems described above were in data preceding the definition of ~S." (:SPECIAL-FORM SPECIAL))) ((:SPECIAL-FORM UNSPECIAL) NIL NIL (COMPILER::FUNCTION-NOT-VALID :OBSOLETE NIL "(DEFUN ~S ...) has "E in argument list. New special forms should be macros" UNSPECIAL) (SI::PREMATURE-WARNING-MARKER NIL NIL "The problems described above were in data preceding the definition of ~S." (:SPECIAL-FORM UNSPECIAL)))))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: SYS; QCP1 LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: IO; FILE; PATHNM LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: IO; FILE; OPEN LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: IO1; TIMPAR LISP >" '((:COMPILE NIL (TIME:PARSE-UNIVERSAL-TIME NIL NIL (COMPILER::WRONG-NUMBER-OF-ARGUMENTS :OBSOLETE NIL "~S called with multiple value arguments~% ~ use ~S instead." RETURN (RETURN (VALUES (ENCODE-UNIVERSAL-TIME TIME::*ABS-SECOND* TIME::*ABS-MINUTE* TIME::*ABS-HOUR* TIME::*ABS-DATE* TIME::*ABS-MONTH* TIME::*ABS-YEAR* TIME::*ABS-TIME-ZONE*) TIME::*RELATIVE-P*))))))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: WINDOW; SHWARM LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: WINDOW; STREAM LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; SCREEN LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; METH LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; HISTORY LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; COMA LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; COMC LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; COMG LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; MODES LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; MOUSE LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; SECTIO LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; ZMNEW LISP >" '((:COMPILE NIL))) ;-*-Mode: Lisp; Package: User; Base: 10. -*- (SI:RELOAD-FILE-WARNINGS '#FS::LOGICAL-PATHNAME "SYS: ZWEI; ZMACS LISP >" '((:COMPILE NIL)))