hưs8p,LAMBDAF2Dp,lFASD-DATADwkfMaurice Ravel<lFF Dp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGELISP-INTERNALSpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DplNCPUT-GLOBAL-DECLARATIONDB;ÀSTREAMDB;DEFSTRUCT-DESCRIPTORDB;$NILpB+ART-QEFBFBFBFFBBBFBFBFDBBDNAME,UNNAMEDDCINPUT-STREAM-PREDBFDINPUT-ELEMENT-TYPE-PROCBFDCEND-OF-STREAM-PREDBFDLISTEN-PREDBFDÁREAD-CHAR-PROCBFDUNREAD-CHAR-PROCBFDÁREAD-LINE-PROCBFDÁREAD-BYTE-PROCBFDÂOTHER-INPUT-OPERATIONSBFDCUNRECOGNIZED-INPUT-OPERATION-PROCBFDCOUTPUT-STREAM-PREDBFDOUTPUT-ELEMENT-TYPE-PROCBFDCSTART-OF-LINE-PREDBFDWRITE-CHAR-PROCBFDCWRITE-STRING-PROCBFDWRITE-BYTE-PROCBFDOTHER-OUTPUT-OPERATIONSBFDCUNRECOGNIZED-OUTPUT-OPERATION-PROCBF1DSETQpSETF,*GRODY-SETF-MACRO-TABLE*DpB+CONSDB;DCSTREAM-UNRECOGNIZED-OUTPUT-OPERATION-PROCÀLAMBDADBBDLET*DDpBy,SINGLE-TEMPVARSDpB+MAPCARDFUNCTIONDBDÀIGNOREDpB+,GENTEMPDB;DBBDpBy,STOREVARDpB+GENSYMDpBy,TEMPVARSBDÀVALUESBDpB+LISTBBDBBDLETDDÀG3813BDBBDpB+NTHBDplSIlXR-BQ-LISTDB;ÁSTRUCTURE-SETDB;DB;BBFBBBDpBXR-BQ-LIST*DB;B~BDCIFDpB+BOUNDPDB;B{B{BFB~1DpB?,DEF-DECLARATIONB~ÀSUBSTDB;DpB?NAMED-LAMBDAB~DBBDÁSTRUCTURE-REFDB;BBFBB1DBxB{DB}DB;DÃSTREAM-OTHER-OUTPUT-OPERATIONSBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3812BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DÂSTREAM-WRITE-BYTE-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3811BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DSTREAM-WRITE-STRING-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3810BDBBDBBDBBDB;DB;BBFBBB&DBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DÂSTREAM-WRITE-CHAR-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3809BDBBDBBDBBDB;DB;BBFBBBKDBDB;BBBBBB1DBBBBDB;DBBBDBBDBDB;BBFBB1DBxB{DB}DB;DCSTREAM-START-OF-LINE-PREDBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3808BDBBDBBDBBDB;DB;BBFBBBpDBDB;BgBBBg1DBBgBDB;DBBgDBBDBDB;BBFBB1DBxB{DB}DB;DSTREAM-OUTPUT-ELEMENT-TYPE-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3807BDBBDBBDBBDB;DB;BBF BBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBF BB1DBxB{DB}DB;DCSTREAM-OUTPUT-STREAM-PREDBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3806BDBBDBBDBBDB;DB;BBF BBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBF BB1DBxB{DB}DB;DSTREAM-UNRECOGNIZED-INPUT-OPERATION-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3805BDBBDBBDBBDB;DB;BBF BBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBF BB1DBxB{DB}DB;DÃSTREAM-OTHER-INPUT-OPERATIONSBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3804BDBBDBBDBBDB;DB;BBF BBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBF BB1DBxB{DB}DB;DÂSTREAM-READ-BYTE-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3803BDBBDBBDBBDB;DB;BBF BBB)DBDB;B BBB 1DBB BDB;DBB DBBDBDB;BBF BB1DBxB{DB}DB;DÂSTREAM-READ-LINE-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3802BDBBDBBDBBDB;DB;BBFBBBNDBDB;BEBBBE1DBBEBDB;DBBEDBBDBDB;BBFBB1DBxB{DB}DB;DSTREAM-UNREAD-CHAR-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3801BDBBDBBDBBDB;DB;BBFBBBsDBDB;BjBBBj1DBBjBDB;DBBjDBBDBDB;BBFBB1DBxB{DB}DB;DÂSTREAM-READ-CHAR-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3800BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DCSTREAM-LISTEN-PREDBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3799BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DCSTREAM-END-OF-STREAM-PREDBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3798BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DÃSTREAM-INPUT-ELEMENT-TYPE-PROCBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3797BDBBDBBDBBDB;DB;BBFBBBDBDB;BBBB1DBBBDB;DBBDBBDBDB;BBFBB1DBxB{DB}DB;DSTREAM-INPUT-STREAM-PREDBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3796BDBBDBBDBBDB;DB;BBFBBB,DBDB;B#BBB#1DBB#BDB;DBB#DBBDBDB;BBFBB1DBxB{DB}DB;DSTREAM-NAMEBDBBDBDDBDBBDB;DBBBDBBDBBDBBBBDBDDÀG3795BDBBDBBDBBDB;DB;BBFBBBQDBDB;BHBBBH1DBBHBDB;DBBHDBBDBDB;BBFBB1DBADB;BBDB;ÁTYPE-EXPANDERDBDBBFDB;DCSATISFIESSTREAMPBB1DBBqBDB;DBBqDÀTHINGDTYPEP-STRUCTUREBxDB;BBBB1DÀDEFVARC*NON-CRASHING-OPERATIONS*DB;DpB FINISH-OUTPUTpB FORCE-OUTPUTpB CLEAR-OUTPUTpB CLEANUP-ABORT-INPUTpB CLEANUP-ABORT-OUTPUTpB CLEAR-INPUT1DB*LOADING-ON-K?*B-1DBÄ*K-INPUT-CHARACTER-STREAM-UNREAD-CHAR*BF1DB*TERMINAL-INPUT*1DBDÀBOUNDPDB;BDBBDÀPROGNDCINITIALIZE-TERMINAL-INPUTDÃFINISH-DEFINING-TERMINAL-INPUT1DBC*TERMINAL-OUTPUT*1DBDBDB;BDBBDCINITIALIZE-TERMINAL-OUTPUT1DBÁ*TERMINAL-IO*DMAKE-TWO-WAY-STREAMBB1DB*STANDARD-INPUT*DMAKE-SYNONYM-STREAMDB;B1DBC*STANDARD-OUTPUT*DBDB;B1DBÁ*ERROR-OUTPUT*DBDB;B1DBC*QUERY-IO*DBDB;B1DBC*DEBUG-IO*DBDB;B1DBÁ*TRACE-OUTPUT*DBDB;B