(SYSTEM::VERSION '(20020129.))
#0Y UTF-8
#Y(#:TOP-LEVEL-FORM-1 #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E2 0F 01 19 01)
   "SYSTEM" COMMON-LISP::*PACKAGE*)
#Y(#:TOP-LEVEL-FORM-2
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   COMMON-LISP::COMPILER-MACRO-FUNCTION SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::COMPILER-MACRO-FUNCTION
      #39Y(00 00 00 00 01 00 01 00 00 08 AE 8E 04 0F AE 89 01 0F 9F 5C 78 C7 14
           38 01 32 82 19 03 AE C5 1B 75 DD AF 30 04 19 03)
      COMMON-LISP::COMPILER-MACRO SYSTEM::FUNCTION-NAME-P
      SYSTEM::COMPILER-MACRO-SETF COMMON-LISP::COMPILER-MACRO-FUNCTION
      SYSTEM::ERROR-FUNCTION-NAME))
#Y(#:TOP-LEVEL-FORM-3
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C8 19 01)
   #.(SYSTEM::GET-SETF-SYMBOL 'COMMON-LISP::COMPILER-MACRO-FUNCTION)
   SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(#1=(COMMON-LISP::SETF COMMON-LISP::COMPILER-MACRO-FUNCTION)
      #41Y(00 00 00 00 02 00 01 00 00 09 AE 8E 04 0A AE 88 01 0D DD AF 30 04 19
           04 AE DA B1 32 86 19 04 9F 5C 78 AC DC B2 32 86 19 05)
      COMMON-LISP::COMPILER-MACRO SYSTEM::FUNCTION-NAME-P
      SYSTEM::COMPILER-MACRO-SETF
      (COMMON-LISP::SETF COMMON-LISP::COMPILER-MACRO-FUNCTION)
      SYSTEM::ERROR-FUNCTION-NAME)
   #1#)
#Y(#:TOP-LEVEL-FORM-4
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::FUNCTION-FORM-FUNFORM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::FUNCTION-FORM-FUNFORM
      #40Y(00 00 00 00 01 00 00 00 00 02 AD 32 02 1F 17 94 01 C5 5A 1F 11 95 01
           32 02 1F 0B 9E 5C 5C 59 1F 05 9E 5C 5B 19 02 19 02)
      COMMON-LISP::FUNCTION))
#Y(#:TOP-LEVEL-FORM-5
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::SIMPLE-FUNCTION-FORM-P SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::SIMPLE-FUNCTION-FORM-P
      #23Y(00 00 00 00 01 00 00 00 00 02 AD 6F 00 9D 1F 05 14 2F 01 19 03 19
           03)
      SYSTEM::FUNCTION-FORM-FUNFORM SYSTEM::FUNCTION-NAME-P))
#Y(#:TOP-LEVEL-FORM-6
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 80 C5 19 01)
   SYSTEM::STRIP-FUNCALL-FORM SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(SYSTEM::STRIP-FUNCALL-FORM
      #35Y(00 00 00 00 01 00 00 00 00 02 94 01 25 00 06 9E 5C 78 88 01 03 9E 19
           02 9E 5C 5B 5C 78 9F 5C 5C 5D 19 02)
      COMMON-LISP::FUNCALL SYSTEM::SIMPLE-FUNCTION-FORM-P))
#Y(#:TOP-LEVEL-FORM-7
   #22Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 6F 03 32 80 C5 19 01)
   COMMON-LISP::DEFINE-COMPILER-MACRO SYSTEM::REMOVE-OLD-DEFINITIONS
   #Y(COMMON-LISP::DEFINE-COMPILER-MACRO
      #71Y(00 00 00 00 01 00 01 00 00 08 AE 72 45 DA 90 01 30 30 95 02 DC 30 03
           42 04 DE DF 93 02 0B E0 E1 B2 7B 02 E2 B1 7B 04 61 01 14 E3 E4 E1 B4
           7B 02 7B 02 B4 7B 03 E1 B3 7B 02 7B 02 33 02 23 62 02 19 07 AE 2F 01
           19 03)
      3. SYSTEM::MACRO-CALL-ERROR SYSTEM::STRIP-FUNCALL-FORM
      SYSTEM::MAKE-MACRO-EXPANSION COMMON-LISP::EVAL-WHEN
      (COMMON-LISP::COMPILE COMMON-LISP::LOAD COMMON-LISP::EVAL)
      SYSTEM::%SET-DOCUMENTATION COMMON-LISP::QUOTE
      'COMMON-LISP::COMPILER-MACRO COMMON-LISP::SETF
      COMMON-LISP::COMPILER-MACRO-FUNCTION)
   SYSTEM::MAKE-MACRO)
