(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE (DEFPACKAGE "FASL" (USE "LISP"))) (IL:FILECREATED "25-Jan-98 13:21:46" ("compiled on " IL:{DSK}sources>FASL-PACKAGE.;1) "30-Mar-95 20:33:04" IL:bcompl'd IL:in "Medley 14-Aug-95 ..." IL:dated "14-Aug-95 15:27:48") (IL:FILECREATED "16-May-90 16:33:38" IL:{DSK}local>lde>lispcore>sources>FASL-PACKAGE.;2 4313 IL:changes IL:to%: (IL:VARS IL:FASL-PACKAGECOMS) IL:previous IL:date%: "27-Apr-88 19:02:59" IL:{DSK}local>lde>lispcore>sources>FASL-PACKAGE.;1) (IL:PRETTYCOMPRINT IL:FASL-PACKAGECOMS) (IL:RPAQQ IL:FASL-PACKAGECOMS ((IL:* IL:;;; "Setting up the FASL package.") (IL:P (XCL:DEFPACKAGE "FASL" (:USE "LISP") (:EXPORT FASL-KEYWORD-SYMBOL FASL-T DUMP-FUNCALL FASL-LIST FASL-LIST* CLOSE-FASL-HANDLE WITH-OPTABLE PROCESS-BLOCK FASL-SHORT-INTEGER PROCESS-FILE FASL-EVAL FASL-RATIO WITH-OPEN-HANDLE FASL-SETF-SYMBOL-FUNCTION UNIMPLEMENTED-OPCODE-OPNAME FASL-VECTOR FASL-CHARACTER FASL-FLOAT32 OBJECT-NOT-DUMPABLE DEFRANGE FASL-VERIFY-TABLE-SIZE DUMP-VALUE VALUE-DUMPABLE-P FASL-DCODE FASL-LOCAL-FN-FIXUPS FASL-TABLE-STORE SKIP-TEXT UNEXPECTED-END-OF-BLOCK-STREAM READ-TEXT INCONSISTENT-TABLE-TABLE FASL-LISP-SYMBOL FASL-INTERLISP-SYMBOL DEFOP OPCODE-SEQUENCE FASL-INITIALIZE-ARRAY FASL-INITIALIZE-BIT-ARRAY SIGNATURE FASL-LARGE-INTEGER OBJECT-NOT-DUMPABLE-OBJECT FASL-FUNCALL FASL-NIL FASL-SYMBOL-IN-PACKAGE NEXT-VALUE UNEXPECTED-END-OF-BLOCK DUMP-FUNCTION-DEF BEGIN-BLOCK BEGIN-TEXT PROCESS-SEGMENT FASL-FIND-PACKAGE FASL-CREATE-ARRAY INCONSISTENT-TABLE-EXPECTED MAKE-OPTABLE *DEFAULT-OPTABLE* FASL-TABLE-FETCH OPEN-FASL-HANDLE CHECK-VERSION FASL-FAT-STRING CURRENT-VERSION UNIMPLEMENTED-OPCODE FASL-ERROR FASL-INTEGER FASL-COMPLEX DUMP-EVAL INCONSISTENT-TABLE FASL-THIN-STRING FASL-BITMAP16 FASL-STRUCTURE)) ) (IL:* IL:;; "Arrange for the correct makefile environment") (IL:PROP IL:MAKEFILE-ENVIRONMENT IL:FASL-PACKAGE))) (XCL:DEFPACKAGE "FASL" (:USE "LISP") (:EXPORT FASL-KEYWORD-SYMBOL FASL-T DUMP-FUNCALL FASL-LIST FASL-LIST* CLOSE-FASL-HANDLE WITH-OPTABLE PROCESS-BLOCK FASL-SHORT-INTEGER PROCESS-FILE FASL-EVAL FASL-RATIO WITH-OPEN-HANDLE FASL-SETF-SYMBOL-FUNCTION UNIMPLEMENTED-OPCODE-OPNAME FASL-VECTOR FASL-CHARACTER FASL-FLOAT32 OBJECT-NOT-DUMPABLE DEFRANGE FASL-VERIFY-TABLE-SIZE DUMP-VALUE VALUE-DUMPABLE-P FASL-DCODE FASL-LOCAL-FN-FIXUPS FASL-TABLE-STORE SKIP-TEXT UNEXPECTED-END-OF-BLOCK-STREAM READ-TEXT INCONSISTENT-TABLE-TABLE FASL-LISP-SYMBOL FASL-INTERLISP-SYMBOL DEFOP OPCODE-SEQUENCE FASL-INITIALIZE-ARRAY FASL-INITIALIZE-BIT-ARRAY SIGNATURE FASL-LARGE-INTEGER OBJECT-NOT-DUMPABLE-OBJECT FASL-FUNCALL FASL-NIL FASL-SYMBOL-IN-PACKAGE NEXT-VALUE UNEXPECTED-END-OF-BLOCK DUMP-FUNCTION-DEF BEGIN-BLOCK BEGIN-TEXT PROCESS-SEGMENT FASL-FIND-PACKAGE FASL-CREATE-ARRAY INCONSISTENT-TABLE-EXPECTED MAKE-OPTABLE *DEFAULT-OPTABLE* FASL-TABLE-FETCH OPEN-FASL-HANDLE CHECK-VERSION FASL-FAT-STRING CURRENT-VERSION UNIMPLEMENTED-OPCODE FASL-ERROR FASL-INTEGER FASL-COMPLEX DUMP-EVAL INCONSISTENT-TABLE FASL-THIN-STRING FASL-BITMAP16 FASL-STRUCTURE)) (IL:PUTPROPS IL:FASL-PACKAGE IL:MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE (XCL:DEFPACKAGE "FASL" (:USE "LISP")))) (IL:PUTPROPS IL:FASL-PACKAGE IL:COPYRIGHT ("Venue & Xerox Corporation" 1986 1988 1990)) NIL