;System Tape made by fileserver at 7-Nov-88 19:14:50  -*-Mode: Lisp; Package: User; Base: 10-*-

;;; Written 7-Nov-88 19:14:50 by fileserver at site Gigamos Cambridge
;;; while running on Djinn from band 1
;;; with Experimental ZMail 74.15, Experimental Tape 26.4, Experimental System 129.0, Experimental ZWEI 127.0, Experimental Local-File 77.0, Experimental File-Server 26.0, Experimental Lambda-Diag 19.0, Experimental Unix-Interface 16.0, Microcode 1762, SDU Boot Tape 3.14, SDU ROM 102, 11/04.

;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TAPE LISP >"
  '((:COMPILE NIL
     (TAPE::PARTITION-SEARCHER NIL NIL
      (SI::EXTRA-PROCESSORS :IMPLAUSIBLE NIL "A ~S expression failed to give alternatives for ~S" SELECT-PROCESSOR (:FALCON))))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; ERROR LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TEST LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TAPEMASTER-DRIVER LISP >"
  '((:COMPILE NIL
     (TM::CCB-TPB-POINTER-BASE NIL NIL
      (COMPILER::DEFSTRUCT-STYLE-WARNING :NOT-PORTABLE NIL "DEFSTRUCT CCB: contains subslot fields (this may not be portable)")
      (SI::PREMATURE-WARNING-MARKER NIL NIL "The problems described above were in data preceding the definition of ~S." TM::CCB-TPB-POINTER-BASE))
     (TM::TPB-LINK-BASE NIL NIL
      (COMPILER::DEFSTRUCT-STYLE-WARNING :NOT-PORTABLE NIL "DEFSTRUCT TPB: contains subslot fields (this may not be portable)")
      (SI::PREMATURE-WARNING-MARKER NIL NIL "The problems described above were in data preceding the definition of ~S." TM::TPB-LINK-BASE))
     (TM::GET-STUPID-UNIT NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with a call to TPB-BANK-SELECT as a BYTE specifier (this may not be portable)")))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; NUPI-SUPPORT LISP >"
  '((:COMPILE NIL
     (SI::NUPI-CHECK-STATUS NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 520 as a BYTE specifier (this is not portable)")))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TAPEMASTER-DEVICE LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; NUPI-DEVICE LISP >"
  '((:COMPILE NIL
     ((:METHOD TAPE::NUPI-DEVICE :INITIALIZE) NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 961 as a BYTE specifier (this is not portable)")
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 1032 as a BYTE specifier (this is not portable)"))
     (TAPE::NUPI-DEVICE-PRESENT? NIL NIL
      (SI::EXTRA-PROCESSORS :IMPLAUSIBLE NIL "A ~S expression failed to give alternatives for ~S" SELECT-PROCESSOR (:FALCON))))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; DUMPIT LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; LMFL-FORMAT LISP >"
  '((:COMPILE NIL
     ((:METHOD TAPE::LMFL-FORMAT :SPACE-TO-END-OF-THIS-FILE) NIL NIL
      (SI::EXTRA-PROCESSORS :IMPLAUSIBLE NIL "A ~S expression failed to give alternatives for ~S" SELECT-PROCESSOR (:FALCON))))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; RAW-FORMAT LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TANALYZ-FORMAT LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TAR-FORMAT LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; BACKUP LISP >"
  '((:COMPILE NIL
     (TAPE::RECURSIVE-FILE-LIST-LOCAL NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB-TEST called with a call to GET as a BYTE specifier (this may not be portable)")))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; USER LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; INITIALIZATIONS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TFRAME-MACROS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TFRAME-DEFS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TFRAME-PROCESS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TFRAME-WINDOW LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TFRAME-COMS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; MTDEFS LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; MTSTR LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; COPY LISP >"
  '((:COMPILE NIL
     (FS::DETERMINE-COPY-DESTINATION NIL NIL
      (COMPILER::BAD-TYPE-SPECIFICATION :IMPLAUSIBLE NIL "~S is not a known type specifier" FS::LOCAL-FILE-PATHNAME)
      (COMPILER::BAD-TYPE-SPECIFICATION :IMPLAUSIBLE NIL "~S is not a known type specifier" FS::REMOTE-LMFILE-PATHNAME))
     (FS::COPY-DESTINATION-EXISTS-P NIL NIL
      (COMPILER::BAD-TYPE-SPECIFICATION :IMPLAUSIBLE NIL "~S is not a known type specifier" FS::LOCAL-FILE-PATHNAME)
      (COMPILER::BAD-TYPE-SPECIFICATION :IMPLAUSIBLE NIL "~S is not a known type specifier" FS::REMOTE-LMFILE-PATHNAME))
     (FS::COPY-DIRECTORY-AFTER-DIRECTORY NIL NIL
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::SINCE)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::ONLY-LATEST)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::FILTER)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::COPY-SUBDIRECTORIES)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::RECOPY-FILE-ON-EOT)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::SELECTIVE)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::COPY-ONLY))
     (FS::COMPARE-DIRECTORY NIL NIL
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::SINCE)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::ONLY-LATEST)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::FILTER)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::COPY-SUBDIRECTORIES)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::RECOPY-FILE-ON-EOT)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::SELECTIVE)
      (COMPILER::NOT-USED :IMPLAUSIBLE NIL "The variable ~S is bound but never used." FS::COPY-ONLY)))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; MTAUX LISP >"
  '((:COMPILE NIL
     (FS::STREAM-COPY-PDP10-QFASL-FILE-FROM-TAPE NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 1010 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-COPY-QFASL-FILE-TO-PDP10-TAPE NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 1010 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-COPY-PDP10-FMT-FILE-FROM-TAPE NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 601 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-COPY-PDP10-FMT-FILE-TO-PDP10-TAPE NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 1 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-COPY-PDP10-ASCII-FILE-FROM-TAPE NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 601 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-READ-PDP10-TAPE-HEADER NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 2222 as a BYTE specifier (this is not portable)"))
     (FS::PDP10-HALF-WORDS NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 2222 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-READ-PDP10-DUMP-HEADER NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 2222 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-READ-PDP10-WORD NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 3410 as a BYTE specifier (this is not portable)"))
     (FS::STREAM-WRITE-PDP10-WORD NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 3410 as a BYTE specifier (this is not portable)"))
     (FS::PDP10-GET-ASCII-FROM-ARRAY NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 3507 as a BYTE specifier (this is not portable)"))
     (FS::PRINT-PDP10-ASCII-WORD NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "LDB called with the numeric constant 3507 as a BYTE specifier (this is not portable)"))
     (FS::LOAD-PDP10-DUMP-MAGTAPE NIL NIL
      (COMPILER:UNDEFINED-FUNCTION-USED :PROBABLE-ERROR NIL "The undefined function ~S was called" FS::STREAM-COPY-PDP10-QFASL-FILE-TO-PDP10-TAPE)))))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; ANSI LISP >"
  '((:COMPILE NIL)))
;-*-Mode: Lisp; Package: User; Base: 10. -*-
(SI:RELOAD-FILE-WARNINGS
  '#FS::LOGICAL-PATHNAME "SYS: TAPE; TOPS20 LISP >"
  '((:COMPILE NIL
     (TOPS20::READ-WORD NIL NIL
      (COMPILER::INVALID-BYTE-SPEC :NOT-PORTABLE NIL "DPB called with the numeric constant 1800 as a BYTE specifier (this is not portable)")))))