hưs2€D€ p€,€¬�COMPILE-DATAD€ì€keith€¬€Opus†€¦F€{F€ëD€p€,�COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEp€B€ ì€LOWELLp€B€ ¬ƒQFASL-SOURCE-FILE-UNIQUE-ID€1€D€p€l€FSì‚MAKE-FASLOAD-PATHNAME€D€p€B€+ì€QUOTE€¬€OPUSD€B€:¬€DSK€D€B€:D€ì€DISCUSì€TESTS€D€B€:,‚SDU-SERIAL-TEST€D€B€:¬€LISPD€B€:F€p€B€ ¬€BASEF€ p€B€ l�READTABLE€p€B€ l€CLp€B€ ,�PACKAGE€p€B€ ¬€USER1€D€pÀl€SI,�DEFVAR-1ƒ�*IO-CHANNEL*ƒ€NIL€¬„Serial I/O stream currently in use.€1€D€�DEFPROP€C�*IO-MODES*B€-p€ì€SYSTEM,‚SYSTEM-CONSTANT€1€D€pÀB€Wl�DEFCONST-1B€`D€B€:D€B€Up€B€ ì€SERVERp€B€ ¬�KILL-SERVER€p€B€ ,‚WAIT-FOR-SERVER€l„Valid run-time modes for IO-TEST.€1€D€B€gÃ�*IO-BAUD-RATE*F€€%Ë€2,І€dÀF€^À�IO-TEST€À†€À†€@À†€„€Ã�*TRACE-OUTPUT*ÑB€sÑB€ZÑB€`‘F€ÀB€iÀF€ ÀF€eÀF€eÀF€eÀF€eÀF€eÀF€e€Ã€SIGNALÒÃ�MAKE-CONDITIONÒp€B€a,‚FAILED-ASSERTIONÀp€B€ ì€PLACESÀD€ƒ€MODEÀp€B€ ì�PROCEED-TYPES€Àp€B€ ,ƒPROCEED-TYPE-PLACE-ALISTÀD€DÀB€ŒB€ŒÀp€B€ ì�FORMAT-STRING€ÀlƒTest mode is not one of ~sÀp€B€ ¬�FORMAT-ARGS€ÀB€ŒÀÀFORMATÒì„~2%Serial I/O test starting in ~a modeÀƒ€OPENÒì�sdu-serial-b:€Àp€B€ ,ƒFLAVOR-AND-INIT-OPTIONS€ÀpÀB€WlƒSDU-SERIAL-XON-XOFF-STREAMÀp€B€ l�BAUD-RATE€ÀB€UÀp€¬€TIME,‚MICROSECOND-TIMEÒC�USER-TEST€Òl…~&Evaluation of ~S took ~:D microseconds.€ÀD€ÀAPPLY€D€�FUNCTIONB€¦ƒ€ARGSÀB€iÀƒ�SERVER-TEST€ÒB€kÀƒ�KILL-SERVER€ÒB€mÀ‚WAIT-FOR-SERVER€’D€D€p€B€ ,‚MACROS-EXPANDED€D€p€¬€LISP¬€TIMEpÀB€Wl�XR-BQ-LISTƒ€SETFƒ€CASEƒ‚SIGNAL-PROCEED-CASE€Ã€ASSERTD€pÀB€(,�ARG-MAP€D€D€B€ŒD€pÀB€(l�LOCAL-MAP€D€D€B€«B€[D€pÀl€EH,�.VALUE.€B€[B€[B€[D€Ã�DOCUMENTATION€l¨Test serial port connections. Modes and args are:�:SERVER () - start up server.�:USER (n) - run test times, communicating with server�:KILL-SERVER () - kill server from other side�:WAIT-FOR-SERVER (n) - wait up to seconds for server to answer��Be sure to start the server before the user.D€pÀB€(¬„PLACEHOLDER-TO-MICRO-FUNCTION-TABLE€€D|þ@DDDDDDDDDD D|UúDÄB÷A×t8BE€÷€E D:ã9E D€Å!@"D#D$D%DD|Uúö€E&t8'B'B(Dc@EÉÚ'BA÷E÷D÷C÷D)D*DAEC3DSDSÿÅEE›€E+t8,D@E›€E-t8.D@E›€E/t80D@E›…O€ÒB€yË€.y†€:ÀF€KÀB€­À€À†€@À†€€…€B€Z‘F€‘Àp€B€ ì€ABORT€ÀF€ˆÀÀPRINT€Òp€B€²¬€READÒƒ€KILLÀƒ€ECHOÀƒ€USERÀÀSERVERÀƒ€TYI€Òƒ€TYO€ÒÀFERRORÒì„Expecting '~c'(~:*~d), got '~c'(~:*~d)ÀC€OKÀƒ€DONEÀB€™Òl‚~&Test completed.€Àì‚~&Invalid message ~s.€ÀÀERRORPÒp€B€ ì€CLOSE€Àì�~%Server exit.€D€D€B€±D€ƒ€SENDƒ€WHENÀPSETQ€p€B€²l€IF�DOTIMES€C�DO-FOREVER‚WITH-OPEN-STREAMD€B€ÃD€D€ÀGOTCHAB€[D€pÀB€W¬‚.FILE-ABORTED-FLAG.€D€C€IOD€C€CHD€B€Ï€‘||/EDB÷ˆ||/EDA×C÷ @CÅ@×ÿÅ@E t8E5@E t8 DCÅï@Et&8 ÀDCÅD—@CÅ@×Du8DECÅDDE@ÅDÕDE3UïY ÀDCÅ @ @CÅ@×ÿÅtâ9EÄÆED@ÅÁBwÿ…A8AÅXADBÅ­›EÄ­›O€B€­Ë€,†€ ÀF€ÀB€®À€À†€@À†€€ƒ€B€Z‘B€ÚÀF€3ÀB€™Ò¬‚~%Killing server...€ÀB€ÜÒB€ßÀB€ëÒB€í€D€D€B€±D€B€ïB€öD€B€ÃD€B€[D€B€üD€B€þD€B€Ï€DA÷3||/ED@×B÷ E Ä DEþZ DBÅAwÿ…@8 @ÅX@DAÅ­›O€B€®Ë€S†€:ÀF€8ÀB€¯À†€À†€@À†€ƒ…€B€Z‘F€ÀF€ ÀF€0ÀF€0ÀF€2ÀB€ÚÀF€eÀF€e€F€gÀB€ÜÒB€àÀp€B€ ,‚TYI-WITH-TIMEOUTÀF€<ÀB€™Òlƒ~%Server did not respond.€Àp€B€ ì€UNTYI€ÀB€ÞÒìƒ~%Server responded and echoed.À¬…~%Somebody responded, but with ~s, not ECHO€ÀB€ëÒB€í€D€D€B€±D€B€ïB€óB€öD€B€¾D€D€�SECONDS€D€B€ÃD€D€ÀGOTCH€B€[D€B€üD€B€þD€B€D€B€Ï€g||/EDA×C÷DCÅCAD€ErÿÅD÷XDEþZEÄCDDÅ@CÅ@×t8DEþZEÄDEþZED@ÅBwÿ…A8AÅXADBÅ­›O€;B€¯Ë€#)u†€FÀF€LÀB€¦À†€À†€@À†€„‡€B€Z‘F€ÀF€ ÀF€0ÀF€0ÀF€2ÀB€ÚÀF€eÀF€eÀF€eÀF€e€F€�ÀB€ÜÒB€áÀB€ÞÒB€âÀB€äÒB€ãÒB€åÒì„Expecting '~c'(~:*~d), got '~c'(~:*~d)ÀB€çÀ¬‚Expecting ~s, got ~sÀC�KEEP-GOINGÀB€èÀB€™Ò¬�~%All done.€ÀB€ëÒB€í€D€D€B€±D€B€ïB€ñB€óÀUNLESSB€ôB€ðB€öD€B€¾D€D€ÀTIMES€D€B€ÃD€D€B€ùB€[D€B€üD€B€þD€ÀTESTS€B€[D€B€D€B€Ï€�||/EDA×C÷ÀDCÅ@ÀCÅD›[6x|€EE÷D÷)F— FECÅ@CÅ@×FuXDFE@ÅFÕFE3UðY@ÀCÅ@×tXDD@ÅDE€cÿU8ÀDÀDCÅDÕDEEUÔYDEþZEÄBwÿ…A8 AÅXA!DBÅ­›O€`B€¦1€D€pÀB€W,„FASL-RECORD-FILE-MACROS-EXPANDEDD€B€:D€D€B€O†€;$@D€B€ö†€l{ D€B€õ†€ý}D€B€ô†€o\D€B€ó†€uÄ}D€B€ñ†€CöãD€B€ð†€·�D€B€ï†€X¡D€B€º†€4…;D€B€¹†€:D€B€¸†€:Â-D€B€·†€J¸ÇD€B€¶†€~ËD€B€´†€Jg9€€