hưs2Dp,lFASD-DATADkhhLambda Four AoF{FDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGELISP-INTERNALSpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀDEFVAR18LNIL1DB?12LBA1DB?C6LBA1DB?ÀSTAK-X1DB?ÀSTAK-Y1DB?ÀSTAK-Z1DDEFMACRORUN-TESTDINFOFUNCDplSIlXR-BQ-LISTDB;ÀPROGNDB;Dp,HARDWARE,WRITE-MICROSECOND-CLOCKDpB],UNBOXED-CONSTANTDpBXXR-BQ-LIST*DB;ÀERRORBUBVDB;DDpB]READ-MICROSECOND-CLOCK