MULTIPLY-FIXNUMNEW-MATH MULTIPLY-FIXNUMNEW-MATH MAKE-BIGNUM-64-GET-NEG-STATUSNEW-MATH MAKE-BIGNUM-32-GET-NEG-STATUSNEW-MATH p @@p `D@` DD@` DD@` DD@` DD@` DD@` DD@` DD@` DD@` DD@` DD@` D,@PA*@!%/`(@@A 4(DxEp@A @A*D00,DE&#7*$!$lD@ DDE@A @A%G&E%F  DIVIDE-FIXNUMNEW-MATH  DIVIDE-FIXNUMNEW-MATH(,- MAKE-BIGNUM-32ARRAY ERRORLISP-INTERNALS1"p@A @AA @"Bp @@ D@PED@` DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ DD@ D*@ *@@ *(@PAD@E&@@ba@A,@A`@(@a@&D@ B`@(@a@$D Zero divide TRUNCATE-FIXNUMNEW-MATH TRUNCATE-FIXNUMNEW-MATH  DIVIDE-FIXNUMNEW-MATH E#F  FLOOR-FIXNUMNEW-MATH  FLOOR-FIXNUMNEW-MATH   MVBIND-2LISP-INTERNALS  DIVIDE-FIXNUMNEW-MATH A# B+ C`@)@(*p@A@A (p@A  @A@A )*&x $"$x`@$@a@&D (p@A @A`@(@a@*D CEILING-FIXNUMNEW-MATH CEILING-FIXNUMNEW-MATH   MVBIND-3LISP-INTERNALS  DIVIDE-FIXNUMNEW-MATH A# B+ Cb@)@(*p@A@A (p@A  @A@A 0)*&x@$"$x`@$@a@&D (p@A @A`@(@a@*D  ADD-FIXNUMNEW-MATH  ADD-FIXNUMNEW-MATH  MAKE-BIGNUM-32-GET-NEG-STATUSNEW-MATH "(@@a&@@r'@A @A0 $0"D DAF`@&@a@(D SUBTRACT-FIXNUMNEW-MATH SUBTRACT-FIXNUMNEW-MATH  MAKE-BIGNUM-32-GET-NEG-STATUSNEW-MATH @"(@@a&@@r'@A @A0 $0"D@DAF`@&@a@(D COMPARE-FIXNUMNEW-MATH COMPARE-FIXNUMNEW-MATH@"&@@a$@`@$@a@&D  TEST-FIXNUMNEW-MATH  TEST-FIXNUMNEW-MATH@a"@`@"@a@ D  NEGATE-FIXNUMNEW-MATH  NEGATE-FIXNUMNEW-MATH MAKE-BIGNUM-32ARRAY B@pB0@A @A@B@!$x@a"@`@"@a@$D FIELD-PASS-FIXNUMNEW-MATH FIELD-PASS-FIXNUMNEW-MATH  FIELD-PASS-BIGNUM-INTERNALNEW-MATH CONVERT-FIXNUM-TO-BIGNUMNEW-MATH CONVERT-FIXNUM-TO-BIGNUMNEW-MATH MVBIND-3LISP-INTERNALS RESOLVE-BYTE-SPECNEW-MATH$A&BDC`@/@b@-@D@@A @A C(#C,@/F&@@A@A$B@0CBPC "D@pE*@@a(@`@(@a@*DP% "D@@A RESOLVE-BYTE-SPEC-INTERNALNEW-MATH RESOLVE-BYTE-SPEC-INTERNALNEW-MATH   CDRCONS CARCONS ERRORLISP-INTERNALS BYTE-POSITION-FIXNUMLISP-INTERNALSFs!@A @A'`&@&p@A @A &@ C@b0@A@AA&B"@@A@A@%$x`@$@a@&D@A ! C C @A  Illegal size in byte specifier RESOLVE-BYTE-SPECNEW-MATH RESOLVE-BYTE-SPECNEW-MATH   MVBIND-2LISP-INTERNALS RESOLVE-BYTE-SPEC-INTERNALNEW-MATH A# B' C`@%@@`0@A@A@$DxB@@C0@A@A`@&@a@$@c@jD$p@A@A &DxB@@C0@A @A`@&@a@$@c@hD  ASH-FIXNUMNEW-MATH  ASH-FIXNUMNEW-MATH  %ASH-FIXNUMNEW-MATH ERRORLISP-INTERNALSFs#@A@AA @"B E#F"Bad shift to ash, must be a fixnum  %ASH-FIXNUMNEW-MATH  %ASH-FIXNUMNEW-MATH    ASH-BIGNUMNEW-MATH CONVERT-FIXNUM-TO-BIGNUMNEW-MATH"p p0 , *@@!*xP(*(@ ( @ (`@ @a@`DP# C(#F3pn@AP#`"@P#-,p-&@@A$@`@$@a@&D  LOGAND-FIXNUMNEW-MATH  LOGAND-FIXNUMNEW-MATH"|  LOGIOR-FIXNUMNEW-MATH  LOGIOR-FIXNUMNEW-MATH`"|  LOGXOR-FIXNUMNEW-MATH  LOGXOR-FIXNUMNEW-MATHp"| LOGXNOR-FIXNUMNEW-MATH LOGXNOR-FIXNUMNEW-MATH"|  LOGNOT-FIXNUMNEW-MATH  LOGNOT-FIXNUMNEW-MATHp!| ALLOCATE-BIGNUMNEW-MATH ALLOCATE-BIGNUMNEW-MATH  ERRORLISP-INTERNALS %ALLOCATE-BIGNUMNEW-MATH  p@A@AB@@B0@A@A!GA B@A Bad size to allocate-bignum %ALLOCATE-BIGNUMNEW-MATH %ALLOCATE-BIGNUMNEW-MATH ALLOCATE-STRUCTURECONS @EF#!@b@ @sF  %VM-READ24NEW-MATH  %VM-READ24NEW-MATH    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBALj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA$@'B(@AB(@@AF Af@fB @A  READ-MDHARDWARE PROGNGLOBAL 2VMA-START-READ-NO-TRANSPORT-VMA-UNBOXED-MD-UNBOXEDHARDWARE 24+HARDWARE  %VM-READ32NEW-MATH  %VM-READ32NEW-MATH    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBALj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA$@'B(@AB(@@AF Af@fB @A  READ-MDHARDWARE PROGNGLOBAL 2VMA-START-READ-NO-TRANSPORT-VMA-UNBOXED-MD-UNBOXEDHARDWARE 32+HARDWARE %VM-READNEW-MATH %VM-READNEW-MATH   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBALj"@ C@g0@A@A C@g0@A @A@A C(@ BA%B(@@AF Ab@bB @A  READ-MDHARDWARE PROGNGLOBAL !VMA-START-READ-VMA-BOXED-MD-BOXEDHARDWARE  %VM-WRITE24NEW-MATH  %VM-WRITE24NEW-MATH   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBAL j"@ C@s0@A@A C@s0@A @A@A C(@ B C(@B(A B C(@B(@B(@ BA%B(A&@)B(@@B@AF Ap@pB @A  PROGNGLOBAL "VMA-START-WRITE-NO-GC-TRAP-UNBOXEDHARDWARE 24+HARDWARE WRITE-MD-UNBOXEDHARDWARE  %VM-WRITE32NEW-MATH  %VM-WRITE32NEW-MATH   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBAL j"@ C@s0@A@A C@s0@A @A@A C(@ B C(@B(A B C(@B(@B(@ BA%B(A&@)B(@@B@AF Ap@pB @A  PROGNGLOBAL "VMA-START-WRITE-NO-GC-TRAP-UNBOXEDHARDWARE 32+HARDWARE WRITE-MD-UNBOXEDHARDWARE  %VM-WRITENEW-MATH  %VM-WRITENEW-MATH    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARGLOBAL CDRGLOBAL CDRGLOBAL CARGLOBAL CDRGLOBAL LENGTHGLOBAL LENGTHGLOBALj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA%B(A&B@AF Af@fB @A  PROGNGLOBAL VMA-START-WRITE-BOXEDHARDWARE WRITE-MD-BOXEDHARDWARE SHRINK-BIGNUM-STRUCTURENEW-MATH SHRINK-BIGNUM-STRUCTURENEW-MATH10.1! ! & %GET-BIGNUM-STATUSNEW-MATH2 b@@ATD@ a4@ T `@AT0@42@p 30@A &@AirGl@A!@AirGn@A!@A &@pS20@A@A0I2$x@T$Dx @@F#ET@ &X @@F#3T@&Z@1C`@"@a@&Dp1.@@a,@`@,@a@.DI2*x , `@AT(@!$'lD@ DDDE@A 1@A*2@(0@  &@ MAKE-BIGNUM-32-GET-NEG-STATUSNEW-MATH MAKE-BIGNUM-32-GET-NEG-STATUSNEW-MATH %GET-BIGNUM-STATUSNEW-MATH ALLOCATE-STRUCTURECONS bAb@r@@@ B T@ %X!C`@"@a@$D MAKE-BIGNUM-64-GET-NEG-STATUSNEW-MATH MAKE-BIGNUM-64-GET-NEG-STATUSNEW-MATH %GET-BIGNUM-STATUSNEW-MATH ALLOCATE-STRUCTURECONS bAf@r@@A B"T@ 'X T@ 'X C`@$@a@&D %GET-BIGNUM-STATUSNEW-MATH %GET-BIGNUM-STATUSNEW-MATH`s!@A@A@D`D