GOOF----LE-8-2.0]4h] gguile  gdefine-module*   goop ggoops g active-slot  gfilenameS foop/goops/active-slot.scm gimportsS ginternal     gexportsS g  gset-current-module    gtoplevel-define!   g make-class g gnameS gdefined?   !gis-a? "! #! $ % &gmemq 'g (' )' *gclass-precedence-list +* ,* -gclass-redefinition .- /- 0gcompute-get-n-set 1gmake 21 31 4g  54 64 7g add-method! 87 97 :g ;: <: =g specializersS >g ?> @> AgformalsS Bgclass Cgslot DBC EgbodyS Fgif Ggeq? Hgslot-definition-allocation IHC JgactiveS KGIJ Lglet* Mgindex Ngslot-ref Ogquote Pgnfields QOP RNBQ SMR Tgs Ugcdr VUC WTV Xg before-ref Yg get-keyword Zgbefore-slot-refS [YZT \X[ ]g after-ref ^gafter-slot-refS _Y^T `]_ ag before-set! bgbefore-slot-set!S cYbT dac eg after-set! fgafter-slot-set!S gYfT heg igunbound jg make-unbound kj lik mSW\`dhl ng slot-set! og+ poM  qnBQp rglist sglambda tgo ut vXt wglet xgres yg%fast-slot-ref zytM {xz |{ }gand ~gnot geqv? xi ~ ]t }] w|x Fvk FX su gv t at gbegin g%fast-slot-set! tM et }e  F Fa s r Lmq g next-method  FK  gmake-procedureS g procedureSC5h|]4    54>"G"+44ii5>"xG"q4 5$b4#i%5$K4&i)4,i55$-4/i4ii5>"G""t""l""d4 05$"0i$!4043605>"G"90i43<=i@ADEHJNPYZ^bfjnyjh] L$F4L5$74L5L$#L$"4L>"G"C64L5L$#L$"4L>"G"Cgo  gres  Jgres W gfilenamefoop/goops/active-slot.scm *   +  ,   ,   - #  -  $ .  ) . . - .  2 . B N 0  O 1  W 1  _ 2  d 2 * h 2  m 2 >  Chh]L$54L5$&4L>"GL$L6CC4L>"GL$L6Cgo  cgv  cgfilenamefoop/goops/active-slot.scm 5   6  7   7   9  1 :  9 : * > <  Y =  a = &  c Ch]:45&z454545454 54 54 >"G O OCL6gclass  gslot  gindex   gs   g before-ref  ) g after-ref  5 g before-set!  A g after-set!  M gunbound  T  gfilenamefoop/goops/active-slot.scm  !  !   "   " *  "   "   #   "  $  ) "  , %  5 "  8 &  A "  D '  M "  P (  T "  W )  ] )  ` ) " e )  *    Chj]OCbgreal-next-method  gfilenamefoop/goops/active-slot.scm   C5 6tgm  ,gt gfilenamefoop/goops/active-slot.scm   1     C6