;Beginning compilation on factor.t

MAIN
LARGEST-PRIME-FACTOR
PRIME-FACTORS
TOO-BIG?
DIVIDES?
MAP-AND-COMBINE-INTERVAL
LAST
SUM
(VARIABLES
  FREE (*FUTURE NO-MORE-COND-CLAUSES)
  EARLY-BOUND ()
  DEFINED (MAIN LARGEST-PRIME-FACTOR PRIME-FACTORS TOO-BIG? DIVIDES?
MAP-AND-COMBINE-INTERVAL LAST SUM)
  LSET ()
  SET ()
  ERROR ()
  INTEGRATED (NULL? CDR CAR FIXNUM-REMAINDER FX= FX* FX> ELSE FX+
FX/ CONS)
  LOCAL ()
  UNREFERENCED (MAIN))
;;; 0 IBs queued, 5 IBs unqueued
(AS (IB 51) (SDF 33) (ALIGN 18) (MARK 591) (CLEAN 11) (DIRTY 8) (BYTES 2656))