(declare (block) (standard-bindings) (extended-bindings) (inlining-limit 200))
(begin
  (define |gx[1]#_g10169_|
    (##structure
     gx#syntax-quote::t
     'expander-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10178_|
    (##structure
     gx#syntax-quote::t
     'expander-context-table-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10180_|
    (##structure
     gx#syntax-quote::t
     'expander-context-id-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10184_|
    (##structure
     gx#syntax-quote::t
     'expander-context-table
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10186_|
    (##structure
     gx#syntax-quote::t
     'expander-context-id
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10188_|
    (##structure
     gx#syntax-quote::t
     'expander-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10190_|
    (##structure
     gx#syntax-quote::t
     'make-expander-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10192_|
    (##structure
     gx#syntax-quote::t
     'root-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10199_|
    (##structure
     gx#syntax-quote::t
     'root-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10201_|
    (##structure
     gx#syntax-quote::t
     'make-root-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10204_|
    (##structure
     gx#syntax-quote::t
     'expander-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10205_|
    (##structure
     gx#syntax-quote::t
     'phi-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10215_|
    (##structure
     gx#syntax-quote::t
     'phi-context-down-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10217_|
    (##structure
     gx#syntax-quote::t
     'phi-context-up-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10219_|
    (##structure
     gx#syntax-quote::t
     'phi-context-super-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10224_|
    (##structure
     gx#syntax-quote::t
     'phi-context-down
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10226_|
    (##structure
     gx#syntax-quote::t
     'phi-context-up
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10228_|
    (##structure
     gx#syntax-quote::t
     'phi-context-super
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10230_|
    (##structure
     gx#syntax-quote::t
     'phi-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10232_|
    (##structure
     gx#syntax-quote::t
     'make-phi-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10235_|
    (##structure
     gx#syntax-quote::t
     'top-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10242_|
    (##structure
     gx#syntax-quote::t
     'top-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10244_|
    (##structure
     gx#syntax-quote::t
     'make-top-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10247_|
    (##structure
     gx#syntax-quote::t
     'phi-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10248_|
    (##structure
     gx#syntax-quote::t
     'module-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10261_|
    (##structure
     gx#syntax-quote::t
     'module-context-code-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10263_|
    (##structure
     gx#syntax-quote::t
     'module-context-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10265_|
    (##structure
     gx#syntax-quote::t
     'module-context-export-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10267_|
    (##structure
     gx#syntax-quote::t
     'module-context-import-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10269_|
    (##structure
     gx#syntax-quote::t
     'module-context-path-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10271_|
    (##structure
     gx#syntax-quote::t
     'module-context-ns-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10279_|
    (##structure
     gx#syntax-quote::t
     'module-context-code
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10281_|
    (##structure
     gx#syntax-quote::t
     'module-context-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10283_|
    (##structure
     gx#syntax-quote::t
     'module-context-export
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10285_|
    (##structure
     gx#syntax-quote::t
     'module-context-import
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10287_|
    (##structure
     gx#syntax-quote::t
     'module-context-path
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10289_|
    (##structure
     gx#syntax-quote::t
     'module-context-ns
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10291_|
    (##structure
     gx#syntax-quote::t
     'module-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10293_|
    (##structure
     gx#syntax-quote::t
     'make-module-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10296_|
    (##structure
     gx#syntax-quote::t
     'top-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10297_|
    (##structure
     gx#syntax-quote::t
     'prelude-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10307_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10309_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-import-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10311_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-path-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10316_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10318_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-import
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10320_|
    (##structure
     gx#syntax-quote::t
     'prelude-context-path
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10322_|
    (##structure
     gx#syntax-quote::t
     'prelude-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10324_|
    (##structure
     gx#syntax-quote::t
     'make-prelude-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10327_|
    (##structure
     gx#syntax-quote::t
     'local-context::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10334_|
    (##structure
     gx#syntax-quote::t
     'local-context?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10336_|
    (##structure
     gx#syntax-quote::t
     'make-local-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10339_|
    (##structure
     gx#syntax-quote::t
     'binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10349_|
    (##structure
     gx#syntax-quote::t
     'binding-phi-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10351_|
    (##structure
     gx#syntax-quote::t
     'binding-key-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10353_|
    (##structure
     gx#syntax-quote::t
     'binding-id-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10358_|
    (##structure
     gx#syntax-quote::t
     'binding-phi
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10360_|
    (##structure
     gx#syntax-quote::t
     'binding-key
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10362_|
    (##structure
     gx#syntax-quote::t
     'binding-id
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10364_|
    (##structure
     gx#syntax-quote::t
     'binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10366_|
    (##structure
     gx#syntax-quote::t
     'make-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10368_|
    (##structure
     gx#syntax-quote::t
     'runtime-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10375_|
    (##structure
     gx#syntax-quote::t
     'runtime-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10377_|
    (##structure
     gx#syntax-quote::t
     'make-runtime-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10380_|
    (##structure
     gx#syntax-quote::t
     'binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10381_|
    (##structure
     gx#syntax-quote::t
     'local-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10388_|
    (##structure
     gx#syntax-quote::t
     'local-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10390_|
    (##structure
     gx#syntax-quote::t
     'make-local-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10393_|
    (##structure
     gx#syntax-quote::t
     'runtime-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10394_|
    (##structure
     gx#syntax-quote::t
     'top-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10401_|
    (##structure
     gx#syntax-quote::t
     'top-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10403_|
    (##structure
     gx#syntax-quote::t
     'make-top-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10406_|
    (##structure
     gx#syntax-quote::t
     'module-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10414_|
    (##structure
     gx#syntax-quote::t
     'module-binding-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10417_|
    (##structure
     gx#syntax-quote::t
     'module-binding-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10419_|
    (##structure
     gx#syntax-quote::t
     'module-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10421_|
    (##structure
     gx#syntax-quote::t
     'make-module-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10424_|
    (##structure
     gx#syntax-quote::t
     'top-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10425_|
    (##structure
     gx#syntax-quote::t
     'extern-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10432_|
    (##structure
     gx#syntax-quote::t
     'extern-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10434_|
    (##structure
     gx#syntax-quote::t
     'make-extern-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10437_|
    (##structure
     gx#syntax-quote::t
     'syntax-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10445_|
    (##structure
     gx#syntax-quote::t
     'syntax-binding-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10448_|
    (##structure
     gx#syntax-quote::t
     'syntax-binding-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10450_|
    (##structure
     gx#syntax-quote::t
     'syntax-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10452_|
    (##structure
     gx#syntax-quote::t
     'make-syntax-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10455_|
    (##structure
     gx#syntax-quote::t
     'import-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10465_|
    (##structure
     gx#syntax-quote::t
     'import-binding-weak?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10467_|
    (##structure
     gx#syntax-quote::t
     'import-binding-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10469_|
    (##structure
     gx#syntax-quote::t
     'import-binding-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10474_|
    (##structure
     gx#syntax-quote::t
     'import-binding-weak?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10476_|
    (##structure
     gx#syntax-quote::t
     'import-binding-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10478_|
    (##structure
     gx#syntax-quote::t
     'import-binding-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10480_|
    (##structure
     gx#syntax-quote::t
     'import-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10482_|
    (##structure
     gx#syntax-quote::t
     'make-import-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10485_|
    (##structure
     gx#syntax-quote::t
     'alias-binding::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10493_|
    (##structure
     gx#syntax-quote::t
     'alias-binding-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10496_|
    (##structure
     gx#syntax-quote::t
     'alias-binding-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10498_|
    (##structure
     gx#syntax-quote::t
     'alias-binding?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10500_|
    (##structure
     gx#syntax-quote::t
     'make-alias-binding
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10503_|
    (##structure
     gx#syntax-quote::t
     'expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10511_|
    (##structure
     gx#syntax-quote::t
     'expander-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10514_|
    (##structure
     gx#syntax-quote::t
     'expander-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10516_|
    (##structure
     gx#syntax-quote::t
     'expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10518_|
    (##structure
     gx#syntax-quote::t
     'make-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10520_|
    (##structure
     gx#syntax-quote::t
     'core-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10529_|
    (##structure
     gx#syntax-quote::t
     'core-expander-compile-top-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10531_|
    (##structure
     gx#syntax-quote::t
     'core-expander-id-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10535_|
    (##structure
     gx#syntax-quote::t
     'core-expander-compile-top
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10537_|
    (##structure
     gx#syntax-quote::t
     'core-expander-id
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10539_|
    (##structure
     gx#syntax-quote::t
     'core-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10541_|
    (##structure
     gx#syntax-quote::t
     'make-core-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10544_|
    (##structure
     gx#syntax-quote::t
     'expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10545_|
    (##structure
     gx#syntax-quote::t
     'expression-form::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10552_|
    (##structure
     gx#syntax-quote::t
     'expression-form?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10554_|
    (##structure
     gx#syntax-quote::t
     'make-expression-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10557_|
    (##structure
     gx#syntax-quote::t
     'core-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10558_|
    (##structure
     gx#syntax-quote::t
     'special-form::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10565_|
    (##structure
     gx#syntax-quote::t
     'special-form?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10567_|
    (##structure
     gx#syntax-quote::t
     'make-special-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10570_|
    (##structure
     gx#syntax-quote::t
     'definition-form::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10577_|
    (##structure
     gx#syntax-quote::t
     'definition-form?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10579_|
    (##structure
     gx#syntax-quote::t
     'make-definition-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10582_|
    (##structure
     gx#syntax-quote::t
     'special-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10583_|
    (##structure
     gx#syntax-quote::t
     'top-special-form::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10590_|
    (##structure
     gx#syntax-quote::t
     'top-special-form?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10592_|
    (##structure
     gx#syntax-quote::t
     'make-top-special-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10595_|
    (##structure
     gx#syntax-quote::t
     'module-special-form::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10602_|
    (##structure
     gx#syntax-quote::t
     'module-special-form?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10604_|
    (##structure
     gx#syntax-quote::t
     'make-module-special-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10607_|
    (##structure
     gx#syntax-quote::t
     'top-special-form
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10608_|
    (##structure
     gx#syntax-quote::t
     'feature-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10615_|
    (##structure
     gx#syntax-quote::t
     'feature-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10617_|
    (##structure
     gx#syntax-quote::t
     'make-feature-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10620_|
    (##structure
     gx#syntax-quote::t
     'private-feature-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10627_|
    (##structure
     gx#syntax-quote::t
     'private-feature-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10629_|
    (##structure
     gx#syntax-quote::t
     'make-private-feature-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10632_|
    (##structure
     gx#syntax-quote::t
     'feature-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10633_|
    (##structure
     gx#syntax-quote::t
     'reserved-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10640_|
    (##structure
     gx#syntax-quote::t
     'reserved-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10642_|
    (##structure
     gx#syntax-quote::t
     'make-reserved-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10645_|
    (##structure
     gx#syntax-quote::t
     'macro-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10652_|
    (##structure
     gx#syntax-quote::t
     'macro-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10654_|
    (##structure
     gx#syntax-quote::t
     'make-macro-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10657_|
    (##structure
     gx#syntax-quote::t
     'rename-macro-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10664_|
    (##structure
     gx#syntax-quote::t
     'rename-macro-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10666_|
    (##structure
     gx#syntax-quote::t
     'make-rename-macro-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10669_|
    (##structure
     gx#syntax-quote::t
     'macro-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10670_|
    (##structure
     gx#syntax-quote::t
     'user-expander::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10679_|
    (##structure
     gx#syntax-quote::t
     'user-expander-phi-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10681_|
    (##structure
     gx#syntax-quote::t
     'user-expander-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10685_|
    (##structure
     gx#syntax-quote::t
     'user-expander-phi
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10687_|
    (##structure
     gx#syntax-quote::t
     'user-expander-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10689_|
    (##structure
     gx#syntax-quote::t
     'user-expander?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10691_|
    (##structure
     gx#syntax-quote::t
     'make-user-expander
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10694_|
    (##structure
     gx#syntax-quote::t
     'expander-mark::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10705_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-trace-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10707_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-phi-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10709_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10711_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-subst-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10717_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-trace
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10719_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-phi
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10721_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10723_|
    (##structure
     gx#syntax-quote::t
     'expander-mark-subst
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10725_|
    (##structure
     gx#syntax-quote::t
     'expander-mark?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g10727_|
    (##structure
     gx#syntax-quote::t
     'make-expander-mark
     #f
     (gx#current-expander-context)
     '()))
  (begin
    (define |gx[:0:]#expander-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10169_|
       'expander-identifiers:
       (let ((__tmp10170
              (let ((__tmp10191 |gx[1]#_g10169_|)
                    (__tmp10171
                     (let ((__tmp10189 |gx[1]#_g10190_|)
                           (__tmp10172
                            (let ((__tmp10187 |gx[1]#_g10188_|)
                                  (__tmp10173
                                   (let ((__tmp10181
                                          (let ((__tmp10185 |gx[1]#_g10186_|)
                                                (__tmp10182
                                                 (let ((__tmp10183
                                                        |gx[1]#_g10184_|))
                                                   (declare (not safe))
                                                   (cons __tmp10183 '()))))
                                            (declare (not safe))
                                            (cons __tmp10185 __tmp10182)))
                                         (__tmp10174
                                          (let ((__tmp10175
                                                 (let ((__tmp10179
                                                        |gx[1]#_g10180_|)
                                                       (__tmp10176
                                                        (let ((__tmp10177
                                                               |gx[1]#_g10178_|))
                                                          (declare (not safe))
                                                          (cons __tmp10177
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10179
                                                         __tmp10176))))
                                            (declare (not safe))
                                            (cons __tmp10175 '()))))
                                     (declare (not safe))
                                     (cons __tmp10181 __tmp10174))))
                              (declare (not safe))
                              (cons __tmp10187 __tmp10173))))
                       (declare (not safe))
                       (cons __tmp10189 __tmp10172))))
                (declare (not safe))
                (cons __tmp10191 __tmp10171))))
         (declare (not safe))
         (cons '#f __tmp10170))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#expander-context::t
        '#f
        'expander-context
        ':init!
        '()
        '(id table))))
    (define |gx[:0:]#root-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10192_|
       'expander-identifiers:
       (let ((__tmp10203 |gx[1]#_g10169_|)
             (__tmp10193
              (let ((__tmp10202 |gx[1]#_g10192_|)
                    (__tmp10194
                     (let ((__tmp10200 |gx[1]#_g10201_|)
                           (__tmp10195
                            (let ((__tmp10198 |gx[1]#_g10199_|)
                                  (__tmp10196
                                   (let ((__tmp10197
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10197))))
                              (declare (not safe))
                              (cons __tmp10198 __tmp10196))))
                       (declare (not safe))
                       (cons __tmp10200 __tmp10195))))
                (declare (not safe))
                (cons __tmp10202 __tmp10194))))
         (declare (not safe))
         (cons __tmp10203 __tmp10193))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#root-context::t
        |gx[1]#_g10204_|
        'root-context
        '#f
        '()
        '())))
    (define |gx[:0:]#phi-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10205_|
       'expander-identifiers:
       (let ((__tmp10234 |gx[1]#_g10169_|)
             (__tmp10206
              (let ((__tmp10233 |gx[1]#_g10205_|)
                    (__tmp10207
                     (let ((__tmp10231 |gx[1]#_g10232_|)
                           (__tmp10208
                            (let ((__tmp10229 |gx[1]#_g10230_|)
                                  (__tmp10209
                                   (let ((__tmp10220
                                          (let ((__tmp10227 |gx[1]#_g10228_|)
                                                (__tmp10221
                                                 (let ((__tmp10225
                                                        |gx[1]#_g10226_|)
                                                       (__tmp10222
                                                        (let ((__tmp10223
                                                               |gx[1]#_g10224_|))
                                                          (declare (not safe))
                                                          (cons __tmp10223
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10225
                                                         __tmp10222))))
                                            (declare (not safe))
                                            (cons __tmp10227 __tmp10221)))
                                         (__tmp10210
                                          (let ((__tmp10211
                                                 (let ((__tmp10218
                                                        |gx[1]#_g10219_|)
                                                       (__tmp10212
                                                        (let ((__tmp10216
                                                               |gx[1]#_g10217_|)
                                                              (__tmp10213
                                                               (let ((__tmp10214
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10215_|))
                         (declare (not safe))
                         (cons __tmp10214 '()))))
                  (declare (not safe))
                  (cons __tmp10216 __tmp10213))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10218
                                                         __tmp10212))))
                                            (declare (not safe))
                                            (cons __tmp10211 '()))))
                                     (declare (not safe))
                                     (cons __tmp10220 __tmp10210))))
                              (declare (not safe))
                              (cons __tmp10229 __tmp10209))))
                       (declare (not safe))
                       (cons __tmp10231 __tmp10208))))
                (declare (not safe))
                (cons __tmp10233 __tmp10207))))
         (declare (not safe))
         (cons __tmp10234 __tmp10206))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#context-phi::t
        |gx[1]#_g10204_|
        'phi-context
        '#f
        '()
        '(super up down))))
    (define |gx[:0:]#top-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10235_|
       'expander-identifiers:
       (let ((__tmp10246 |gx[1]#_g10205_|)
             (__tmp10236
              (let ((__tmp10245 |gx[1]#_g10235_|)
                    (__tmp10237
                     (let ((__tmp10243 |gx[1]#_g10244_|)
                           (__tmp10238
                            (let ((__tmp10241 |gx[1]#_g10242_|)
                                  (__tmp10239
                                   (let ((__tmp10240
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10240))))
                              (declare (not safe))
                              (cons __tmp10241 __tmp10239))))
                       (declare (not safe))
                       (cons __tmp10243 __tmp10238))))
                (declare (not safe))
                (cons __tmp10245 __tmp10237))))
         (declare (not safe))
         (cons __tmp10246 __tmp10236))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#top-context::t
        |gx[1]#_g10247_|
        'top-context
        '#f
        '()
        '())))
    (define |gx[:0:]#module-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10248_|
       'expander-identifiers:
       (let ((__tmp10295 |gx[1]#_g10235_|)
             (__tmp10249
              (let ((__tmp10294 |gx[1]#_g10248_|)
                    (__tmp10250
                     (let ((__tmp10292 |gx[1]#_g10293_|)
                           (__tmp10251
                            (let ((__tmp10290 |gx[1]#_g10291_|)
                                  (__tmp10252
                                   (let ((__tmp10272
                                          (let ((__tmp10288 |gx[1]#_g10289_|)
                                                (__tmp10273
                                                 (let ((__tmp10286
                                                        |gx[1]#_g10287_|)
                                                       (__tmp10274
                                                        (let ((__tmp10284
                                                               |gx[1]#_g10285_|)
                                                              (__tmp10275
                                                               (let ((__tmp10282
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10283_|)
                             (__tmp10276
                              (let ((__tmp10280 |gx[1]#_g10281_|)
                                    (__tmp10277
                                     (let ((__tmp10278 |gx[1]#_g10279_|))
                                       (declare (not safe))
                                       (cons __tmp10278 '()))))
                                (declare (not safe))
                                (cons __tmp10280 __tmp10277))))
                         (declare (not safe))
                         (cons __tmp10282 __tmp10276))))
                  (declare (not safe))
                  (cons __tmp10284 __tmp10275))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10286
                                                         __tmp10274))))
                                            (declare (not safe))
                                            (cons __tmp10288 __tmp10273)))
                                         (__tmp10253
                                          (let ((__tmp10254
                                                 (let ((__tmp10270
                                                        |gx[1]#_g10271_|)
                                                       (__tmp10255
                                                        (let ((__tmp10268
                                                               |gx[1]#_g10269_|)
                                                              (__tmp10256
                                                               (let ((__tmp10266
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10267_|)
                             (__tmp10257
                              (let ((__tmp10264 |gx[1]#_g10265_|)
                                    (__tmp10258
                                     (let ((__tmp10262 |gx[1]#_g10263_|)
                                           (__tmp10259
                                            (let ((__tmp10260
                                                   |gx[1]#_g10261_|))
                                              (declare (not safe))
                                              (cons __tmp10260 '()))))
                                       (declare (not safe))
                                       (cons __tmp10262 __tmp10259))))
                                (declare (not safe))
                                (cons __tmp10264 __tmp10258))))
                         (declare (not safe))
                         (cons __tmp10266 __tmp10257))))
                  (declare (not safe))
                  (cons __tmp10268 __tmp10256))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10270
                                                         __tmp10255))))
                                            (declare (not safe))
                                            (cons __tmp10254 '()))))
                                     (declare (not safe))
                                     (cons __tmp10272 __tmp10253))))
                              (declare (not safe))
                              (cons __tmp10290 __tmp10252))))
                       (declare (not safe))
                       (cons __tmp10292 __tmp10251))))
                (declare (not safe))
                (cons __tmp10294 __tmp10250))))
         (declare (not safe))
         (cons __tmp10295 __tmp10249))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#module-context::t
        |gx[1]#_g10296_|
        'module-context
        '#f
        '()
        '(ns path import export e code))))
    (define |gx[:0:]#prelude-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10297_|
       'expander-identifiers:
       (let ((__tmp10326 |gx[1]#_g10235_|)
             (__tmp10298
              (let ((__tmp10325 |gx[1]#_g10297_|)
                    (__tmp10299
                     (let ((__tmp10323 |gx[1]#_g10324_|)
                           (__tmp10300
                            (let ((__tmp10321 |gx[1]#_g10322_|)
                                  (__tmp10301
                                   (let ((__tmp10312
                                          (let ((__tmp10319 |gx[1]#_g10320_|)
                                                (__tmp10313
                                                 (let ((__tmp10317
                                                        |gx[1]#_g10318_|)
                                                       (__tmp10314
                                                        (let ((__tmp10315
                                                               |gx[1]#_g10316_|))
                                                          (declare (not safe))
                                                          (cons __tmp10315
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10317
                                                         __tmp10314))))
                                            (declare (not safe))
                                            (cons __tmp10319 __tmp10313)))
                                         (__tmp10302
                                          (let ((__tmp10303
                                                 (let ((__tmp10310
                                                        |gx[1]#_g10311_|)
                                                       (__tmp10304
                                                        (let ((__tmp10308
                                                               |gx[1]#_g10309_|)
                                                              (__tmp10305
                                                               (let ((__tmp10306
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10307_|))
                         (declare (not safe))
                         (cons __tmp10306 '()))))
                  (declare (not safe))
                  (cons __tmp10308 __tmp10305))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10310
                                                         __tmp10304))))
                                            (declare (not safe))
                                            (cons __tmp10303 '()))))
                                     (declare (not safe))
                                     (cons __tmp10312 __tmp10302))))
                              (declare (not safe))
                              (cons __tmp10321 __tmp10301))))
                       (declare (not safe))
                       (cons __tmp10323 __tmp10300))))
                (declare (not safe))
                (cons __tmp10325 __tmp10299))))
         (declare (not safe))
         (cons __tmp10326 __tmp10298))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#prelude-context::t
        |gx[1]#_g10296_|
        'prelude-context
        '#f
        '()
        '(path import e))))
    (define |gx[:0:]#local-context|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10327_|
       'expander-identifiers:
       (let ((__tmp10338 |gx[1]#_g10205_|)
             (__tmp10328
              (let ((__tmp10337 |gx[1]#_g10327_|)
                    (__tmp10329
                     (let ((__tmp10335 |gx[1]#_g10336_|)
                           (__tmp10330
                            (let ((__tmp10333 |gx[1]#_g10334_|)
                                  (__tmp10331
                                   (let ((__tmp10332
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10332))))
                              (declare (not safe))
                              (cons __tmp10333 __tmp10331))))
                       (declare (not safe))
                       (cons __tmp10335 __tmp10330))))
                (declare (not safe))
                (cons __tmp10337 __tmp10329))))
         (declare (not safe))
         (cons __tmp10338 __tmp10328))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#local-context::t
        |gx[1]#_g10247_|
        'local-context
        '#f
        '()
        '())))
    (define |gx[:0:]#binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10339_|
       'expander-identifiers:
       (let ((__tmp10340
              (let ((__tmp10367 |gx[1]#_g10339_|)
                    (__tmp10341
                     (let ((__tmp10365 |gx[1]#_g10366_|)
                           (__tmp10342
                            (let ((__tmp10363 |gx[1]#_g10364_|)
                                  (__tmp10343
                                   (let ((__tmp10354
                                          (let ((__tmp10361 |gx[1]#_g10362_|)
                                                (__tmp10355
                                                 (let ((__tmp10359
                                                        |gx[1]#_g10360_|)
                                                       (__tmp10356
                                                        (let ((__tmp10357
                                                               |gx[1]#_g10358_|))
                                                          (declare (not safe))
                                                          (cons __tmp10357
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10359
                                                         __tmp10356))))
                                            (declare (not safe))
                                            (cons __tmp10361 __tmp10355)))
                                         (__tmp10344
                                          (let ((__tmp10345
                                                 (let ((__tmp10352
                                                        |gx[1]#_g10353_|)
                                                       (__tmp10346
                                                        (let ((__tmp10350
                                                               |gx[1]#_g10351_|)
                                                              (__tmp10347
                                                               (let ((__tmp10348
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10349_|))
                         (declare (not safe))
                         (cons __tmp10348 '()))))
                  (declare (not safe))
                  (cons __tmp10350 __tmp10347))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10352
                                                         __tmp10346))))
                                            (declare (not safe))
                                            (cons __tmp10345 '()))))
                                     (declare (not safe))
                                     (cons __tmp10354 __tmp10344))))
                              (declare (not safe))
                              (cons __tmp10363 __tmp10343))))
                       (declare (not safe))
                       (cons __tmp10365 __tmp10342))))
                (declare (not safe))
                (cons __tmp10367 __tmp10341))))
         (declare (not safe))
         (cons '#f __tmp10340))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#binding::t
        '#f
        'binding
        '#f
        '((transparent: . #t))
        '(id key phi))))
    (define |gx[:0:]#runtime-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10368_|
       'expander-identifiers:
       (let ((__tmp10379 |gx[1]#_g10339_|)
             (__tmp10369
              (let ((__tmp10378 |gx[1]#_g10368_|)
                    (__tmp10370
                     (let ((__tmp10376 |gx[1]#_g10377_|)
                           (__tmp10371
                            (let ((__tmp10374 |gx[1]#_g10375_|)
                                  (__tmp10372
                                   (let ((__tmp10373
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10373))))
                              (declare (not safe))
                              (cons __tmp10374 __tmp10372))))
                       (declare (not safe))
                       (cons __tmp10376 __tmp10371))))
                (declare (not safe))
                (cons __tmp10378 __tmp10370))))
         (declare (not safe))
         (cons __tmp10379 __tmp10369))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#runtime-binding::t
        |gx[1]#_g10380_|
        'runtime-binding
        '#f
        '((transparent: . #t))
        '())))
    (define |gx[:0:]#local-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10381_|
       'expander-identifiers:
       (let ((__tmp10392 |gx[1]#_g10368_|)
             (__tmp10382
              (let ((__tmp10391 |gx[1]#_g10381_|)
                    (__tmp10383
                     (let ((__tmp10389 |gx[1]#_g10390_|)
                           (__tmp10384
                            (let ((__tmp10387 |gx[1]#_g10388_|)
                                  (__tmp10385
                                   (let ((__tmp10386
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10386))))
                              (declare (not safe))
                              (cons __tmp10387 __tmp10385))))
                       (declare (not safe))
                       (cons __tmp10389 __tmp10384))))
                (declare (not safe))
                (cons __tmp10391 __tmp10383))))
         (declare (not safe))
         (cons __tmp10392 __tmp10382))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#local-binding::t
        |gx[1]#_g10393_|
        'local-binding
        '#f
        '((transparent: . #t))
        '())))
    (define |gx[:0:]#top-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10394_|
       'expander-identifiers:
       (let ((__tmp10405 |gx[1]#_g10368_|)
             (__tmp10395
              (let ((__tmp10404 |gx[1]#_g10394_|)
                    (__tmp10396
                     (let ((__tmp10402 |gx[1]#_g10403_|)
                           (__tmp10397
                            (let ((__tmp10400 |gx[1]#_g10401_|)
                                  (__tmp10398
                                   (let ((__tmp10399
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10399))))
                              (declare (not safe))
                              (cons __tmp10400 __tmp10398))))
                       (declare (not safe))
                       (cons __tmp10402 __tmp10397))))
                (declare (not safe))
                (cons __tmp10404 __tmp10396))))
         (declare (not safe))
         (cons __tmp10405 __tmp10395))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#top-binding::t
        |gx[1]#_g10393_|
        'top-binding
        '#f
        '((transparent: . #t))
        '())))
    (define |gx[:0:]#module-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10406_|
       'expander-identifiers:
       (let ((__tmp10423 |gx[1]#_g10394_|)
             (__tmp10407
              (let ((__tmp10422 |gx[1]#_g10406_|)
                    (__tmp10408
                     (let ((__tmp10420 |gx[1]#_g10421_|)
                           (__tmp10409
                            (let ((__tmp10418 |gx[1]#_g10419_|)
                                  (__tmp10410
                                   (let ((__tmp10415
                                          (let ((__tmp10416 |gx[1]#_g10417_|))
                                            (declare (not safe))
                                            (cons __tmp10416 '())))
                                         (__tmp10411
                                          (let ((__tmp10412
                                                 (let ((__tmp10413
                                                        |gx[1]#_g10414_|))
                                                   (declare (not safe))
                                                   (cons __tmp10413 '()))))
                                            (declare (not safe))
                                            (cons __tmp10412 '()))))
                                     (declare (not safe))
                                     (cons __tmp10415 __tmp10411))))
                              (declare (not safe))
                              (cons __tmp10418 __tmp10410))))
                       (declare (not safe))
                       (cons __tmp10420 __tmp10409))))
                (declare (not safe))
                (cons __tmp10422 __tmp10408))))
         (declare (not safe))
         (cons __tmp10423 __tmp10407))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#module-binding::t
        |gx[1]#_g10424_|
        'module-binding
        '#f
        '((transparent: . #t))
        '(context))))
    (define |gx[:0:]#extern-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10425_|
       'expander-identifiers:
       (let ((__tmp10436 |gx[1]#_g10394_|)
             (__tmp10426
              (let ((__tmp10435 |gx[1]#_g10425_|)
                    (__tmp10427
                     (let ((__tmp10433 |gx[1]#_g10434_|)
                           (__tmp10428
                            (let ((__tmp10431 |gx[1]#_g10432_|)
                                  (__tmp10429
                                   (let ((__tmp10430
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10430))))
                              (declare (not safe))
                              (cons __tmp10431 __tmp10429))))
                       (declare (not safe))
                       (cons __tmp10433 __tmp10428))))
                (declare (not safe))
                (cons __tmp10435 __tmp10427))))
         (declare (not safe))
         (cons __tmp10436 __tmp10426))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#extern-binding::t
        |gx[1]#_g10424_|
        'extern-binding
        '#f
        '((transparent: . #t))
        '())))
    (define |gx[:0:]#syntax-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10437_|
       'expander-identifiers:
       (let ((__tmp10454 |gx[1]#_g10339_|)
             (__tmp10438
              (let ((__tmp10453 |gx[1]#_g10437_|)
                    (__tmp10439
                     (let ((__tmp10451 |gx[1]#_g10452_|)
                           (__tmp10440
                            (let ((__tmp10449 |gx[1]#_g10450_|)
                                  (__tmp10441
                                   (let ((__tmp10446
                                          (let ((__tmp10447 |gx[1]#_g10448_|))
                                            (declare (not safe))
                                            (cons __tmp10447 '())))
                                         (__tmp10442
                                          (let ((__tmp10443
                                                 (let ((__tmp10444
                                                        |gx[1]#_g10445_|))
                                                   (declare (not safe))
                                                   (cons __tmp10444 '()))))
                                            (declare (not safe))
                                            (cons __tmp10443 '()))))
                                     (declare (not safe))
                                     (cons __tmp10446 __tmp10442))))
                              (declare (not safe))
                              (cons __tmp10449 __tmp10441))))
                       (declare (not safe))
                       (cons __tmp10451 __tmp10440))))
                (declare (not safe))
                (cons __tmp10453 __tmp10439))))
         (declare (not safe))
         (cons __tmp10454 __tmp10438))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#syntax-binding::t
        |gx[1]#_g10380_|
        'syntax-binding
        '#f
        '((final: . #t) (transparent: . #t))
        '(e))))
    (define |gx[:0:]#import-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10455_|
       'expander-identifiers:
       (let ((__tmp10484 |gx[1]#_g10339_|)
             (__tmp10456
              (let ((__tmp10483 |gx[1]#_g10455_|)
                    (__tmp10457
                     (let ((__tmp10481 |gx[1]#_g10482_|)
                           (__tmp10458
                            (let ((__tmp10479 |gx[1]#_g10480_|)
                                  (__tmp10459
                                   (let ((__tmp10470
                                          (let ((__tmp10477 |gx[1]#_g10478_|)
                                                (__tmp10471
                                                 (let ((__tmp10475
                                                        |gx[1]#_g10476_|)
                                                       (__tmp10472
                                                        (let ((__tmp10473
                                                               |gx[1]#_g10474_|))
                                                          (declare (not safe))
                                                          (cons __tmp10473
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10475
                                                         __tmp10472))))
                                            (declare (not safe))
                                            (cons __tmp10477 __tmp10471)))
                                         (__tmp10460
                                          (let ((__tmp10461
                                                 (let ((__tmp10468
                                                        |gx[1]#_g10469_|)
                                                       (__tmp10462
                                                        (let ((__tmp10466
                                                               |gx[1]#_g10467_|)
                                                              (__tmp10463
                                                               (let ((__tmp10464
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10465_|))
                         (declare (not safe))
                         (cons __tmp10464 '()))))
                  (declare (not safe))
                  (cons __tmp10466 __tmp10463))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10468
                                                         __tmp10462))))
                                            (declare (not safe))
                                            (cons __tmp10461 '()))))
                                     (declare (not safe))
                                     (cons __tmp10470 __tmp10460))))
                              (declare (not safe))
                              (cons __tmp10479 __tmp10459))))
                       (declare (not safe))
                       (cons __tmp10481 __tmp10458))))
                (declare (not safe))
                (cons __tmp10483 __tmp10457))))
         (declare (not safe))
         (cons __tmp10484 __tmp10456))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#import-binding::t
        |gx[1]#_g10380_|
        'import-binding
        '#f
        '((final: . #t) (transparent: . #t))
        '(e context weak?))))
    (define |gx[:0:]#alias-binding|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10485_|
       'expander-identifiers:
       (let ((__tmp10502 |gx[1]#_g10339_|)
             (__tmp10486
              (let ((__tmp10501 |gx[1]#_g10485_|)
                    (__tmp10487
                     (let ((__tmp10499 |gx[1]#_g10500_|)
                           (__tmp10488
                            (let ((__tmp10497 |gx[1]#_g10498_|)
                                  (__tmp10489
                                   (let ((__tmp10494
                                          (let ((__tmp10495 |gx[1]#_g10496_|))
                                            (declare (not safe))
                                            (cons __tmp10495 '())))
                                         (__tmp10490
                                          (let ((__tmp10491
                                                 (let ((__tmp10492
                                                        |gx[1]#_g10493_|))
                                                   (declare (not safe))
                                                   (cons __tmp10492 '()))))
                                            (declare (not safe))
                                            (cons __tmp10491 '()))))
                                     (declare (not safe))
                                     (cons __tmp10494 __tmp10490))))
                              (declare (not safe))
                              (cons __tmp10497 __tmp10489))))
                       (declare (not safe))
                       (cons __tmp10499 __tmp10488))))
                (declare (not safe))
                (cons __tmp10501 __tmp10487))))
         (declare (not safe))
         (cons __tmp10502 __tmp10486))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#alias-binding::t
        |gx[1]#_g10380_|
        'alias-binding
        '#f
        '((final: . #t) (transparent: . #t))
        '(e))))
    (define |gx[:0:]#expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10503_|
       'expander-identifiers:
       (let ((__tmp10504
              (let ((__tmp10519 |gx[1]#_g10503_|)
                    (__tmp10505
                     (let ((__tmp10517 |gx[1]#_g10518_|)
                           (__tmp10506
                            (let ((__tmp10515 |gx[1]#_g10516_|)
                                  (__tmp10507
                                   (let ((__tmp10512
                                          (let ((__tmp10513 |gx[1]#_g10514_|))
                                            (declare (not safe))
                                            (cons __tmp10513 '())))
                                         (__tmp10508
                                          (let ((__tmp10509
                                                 (let ((__tmp10510
                                                        |gx[1]#_g10511_|))
                                                   (declare (not safe))
                                                   (cons __tmp10510 '()))))
                                            (declare (not safe))
                                            (cons __tmp10509 '()))))
                                     (declare (not safe))
                                     (cons __tmp10512 __tmp10508))))
                              (declare (not safe))
                              (cons __tmp10515 __tmp10507))))
                       (declare (not safe))
                       (cons __tmp10517 __tmp10506))))
                (declare (not safe))
                (cons __tmp10519 __tmp10505))))
         (declare (not safe))
         (cons '#f __tmp10504))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#expander::t
        '#f
        'expander
        '#f
        '()
        '(e))))
    (define |gx[:0:]#core-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10520_|
       'expander-identifiers:
       (let ((__tmp10543 |gx[1]#_g10503_|)
             (__tmp10521
              (let ((__tmp10542 |gx[1]#_g10520_|)
                    (__tmp10522
                     (let ((__tmp10540 |gx[1]#_g10541_|)
                           (__tmp10523
                            (let ((__tmp10538 |gx[1]#_g10539_|)
                                  (__tmp10524
                                   (let ((__tmp10532
                                          (let ((__tmp10536 |gx[1]#_g10537_|)
                                                (__tmp10533
                                                 (let ((__tmp10534
                                                        |gx[1]#_g10535_|))
                                                   (declare (not safe))
                                                   (cons __tmp10534 '()))))
                                            (declare (not safe))
                                            (cons __tmp10536 __tmp10533)))
                                         (__tmp10525
                                          (let ((__tmp10526
                                                 (let ((__tmp10530
                                                        |gx[1]#_g10531_|)
                                                       (__tmp10527
                                                        (let ((__tmp10528
                                                               |gx[1]#_g10529_|))
                                                          (declare (not safe))
                                                          (cons __tmp10528
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10530
                                                         __tmp10527))))
                                            (declare (not safe))
                                            (cons __tmp10526 '()))))
                                     (declare (not safe))
                                     (cons __tmp10532 __tmp10525))))
                              (declare (not safe))
                              (cons __tmp10538 __tmp10524))))
                       (declare (not safe))
                       (cons __tmp10540 __tmp10523))))
                (declare (not safe))
                (cons __tmp10542 __tmp10522))))
         (declare (not safe))
         (cons __tmp10543 __tmp10521))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#core-expander::t
        |gx[1]#_g10544_|
        'core-expander
        '#f
        '()
        '(id compile-top))))
    (define |gx[:0:]#expression-form|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10545_|
       'expander-identifiers:
       (let ((__tmp10556 |gx[1]#_g10520_|)
             (__tmp10546
              (let ((__tmp10555 |gx[1]#_g10545_|)
                    (__tmp10547
                     (let ((__tmp10553 |gx[1]#_g10554_|)
                           (__tmp10548
                            (let ((__tmp10551 |gx[1]#_g10552_|)
                                  (__tmp10549
                                   (let ((__tmp10550
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10550))))
                              (declare (not safe))
                              (cons __tmp10551 __tmp10549))))
                       (declare (not safe))
                       (cons __tmp10553 __tmp10548))))
                (declare (not safe))
                (cons __tmp10555 __tmp10547))))
         (declare (not safe))
         (cons __tmp10556 __tmp10546))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#expression-form::t
        |gx[1]#_g10557_|
        'expression-form
        '#f
        '()
        '())))
    (define |gx[:0:]#special-form|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10558_|
       'expander-identifiers:
       (let ((__tmp10569 |gx[1]#_g10520_|)
             (__tmp10559
              (let ((__tmp10568 |gx[1]#_g10558_|)
                    (__tmp10560
                     (let ((__tmp10566 |gx[1]#_g10567_|)
                           (__tmp10561
                            (let ((__tmp10564 |gx[1]#_g10565_|)
                                  (__tmp10562
                                   (let ((__tmp10563
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10563))))
                              (declare (not safe))
                              (cons __tmp10564 __tmp10562))))
                       (declare (not safe))
                       (cons __tmp10566 __tmp10561))))
                (declare (not safe))
                (cons __tmp10568 __tmp10560))))
         (declare (not safe))
         (cons __tmp10569 __tmp10559))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#special-form::t
        |gx[1]#_g10557_|
        'special-form
        '#f
        '()
        '())))
    (define |gx[:0:]#definition-form|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10570_|
       'expander-identifiers:
       (let ((__tmp10581 |gx[1]#_g10558_|)
             (__tmp10571
              (let ((__tmp10580 |gx[1]#_g10570_|)
                    (__tmp10572
                     (let ((__tmp10578 |gx[1]#_g10579_|)
                           (__tmp10573
                            (let ((__tmp10576 |gx[1]#_g10577_|)
                                  (__tmp10574
                                   (let ((__tmp10575
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10575))))
                              (declare (not safe))
                              (cons __tmp10576 __tmp10574))))
                       (declare (not safe))
                       (cons __tmp10578 __tmp10573))))
                (declare (not safe))
                (cons __tmp10580 __tmp10572))))
         (declare (not safe))
         (cons __tmp10581 __tmp10571))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#definition-form::t
        |gx[1]#_g10582_|
        'definition-form
        '#f
        '()
        '())))
    (define |gx[:0:]#top-special-form|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10583_|
       'expander-identifiers:
       (let ((__tmp10594 |gx[1]#_g10558_|)
             (__tmp10584
              (let ((__tmp10593 |gx[1]#_g10583_|)
                    (__tmp10585
                     (let ((__tmp10591 |gx[1]#_g10592_|)
                           (__tmp10586
                            (let ((__tmp10589 |gx[1]#_g10590_|)
                                  (__tmp10587
                                   (let ((__tmp10588
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10588))))
                              (declare (not safe))
                              (cons __tmp10589 __tmp10587))))
                       (declare (not safe))
                       (cons __tmp10591 __tmp10586))))
                (declare (not safe))
                (cons __tmp10593 __tmp10585))))
         (declare (not safe))
         (cons __tmp10594 __tmp10584))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#top-special-form::t
        |gx[1]#_g10582_|
        'top-special-form
        '#f
        '()
        '())))
    (define |gx[:0:]#module-special-form|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10595_|
       'expander-identifiers:
       (let ((__tmp10606 |gx[1]#_g10583_|)
             (__tmp10596
              (let ((__tmp10605 |gx[1]#_g10595_|)
                    (__tmp10597
                     (let ((__tmp10603 |gx[1]#_g10604_|)
                           (__tmp10598
                            (let ((__tmp10601 |gx[1]#_g10602_|)
                                  (__tmp10599
                                   (let ((__tmp10600
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10600))))
                              (declare (not safe))
                              (cons __tmp10601 __tmp10599))))
                       (declare (not safe))
                       (cons __tmp10603 __tmp10598))))
                (declare (not safe))
                (cons __tmp10605 __tmp10597))))
         (declare (not safe))
         (cons __tmp10606 __tmp10596))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#module-special-form::t
        |gx[1]#_g10607_|
        'module-special-form
        '#f
        '()
        '())))
    (define |gx[:0:]#feature-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10608_|
       'expander-identifiers:
       (let ((__tmp10619 |gx[1]#_g10503_|)
             (__tmp10609
              (let ((__tmp10618 |gx[1]#_g10608_|)
                    (__tmp10610
                     (let ((__tmp10616 |gx[1]#_g10617_|)
                           (__tmp10611
                            (let ((__tmp10614 |gx[1]#_g10615_|)
                                  (__tmp10612
                                   (let ((__tmp10613
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10613))))
                              (declare (not safe))
                              (cons __tmp10614 __tmp10612))))
                       (declare (not safe))
                       (cons __tmp10616 __tmp10611))))
                (declare (not safe))
                (cons __tmp10618 __tmp10610))))
         (declare (not safe))
         (cons __tmp10619 __tmp10609))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#feature-expander::t
        |gx[1]#_g10544_|
        'feature-expander
        '#f
        '()
        '())))
    (define |gx[:0:]#private-feature-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10620_|
       'expander-identifiers:
       (let ((__tmp10631 |gx[1]#_g10608_|)
             (__tmp10621
              (let ((__tmp10630 |gx[1]#_g10620_|)
                    (__tmp10622
                     (let ((__tmp10628 |gx[1]#_g10629_|)
                           (__tmp10623
                            (let ((__tmp10626 |gx[1]#_g10627_|)
                                  (__tmp10624
                                   (let ((__tmp10625
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10625))))
                              (declare (not safe))
                              (cons __tmp10626 __tmp10624))))
                       (declare (not safe))
                       (cons __tmp10628 __tmp10623))))
                (declare (not safe))
                (cons __tmp10630 __tmp10622))))
         (declare (not safe))
         (cons __tmp10631 __tmp10621))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#private-feature-expander::t
        |gx[1]#_g10632_|
        'private-feature-expander
        '#f
        '()
        '())))
    (define |gx[:0:]#reserved-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10633_|
       'expander-identifiers:
       (let ((__tmp10644 |gx[1]#_g10503_|)
             (__tmp10634
              (let ((__tmp10643 |gx[1]#_g10633_|)
                    (__tmp10635
                     (let ((__tmp10641 |gx[1]#_g10642_|)
                           (__tmp10636
                            (let ((__tmp10639 |gx[1]#_g10640_|)
                                  (__tmp10637
                                   (let ((__tmp10638
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10638))))
                              (declare (not safe))
                              (cons __tmp10639 __tmp10637))))
                       (declare (not safe))
                       (cons __tmp10641 __tmp10636))))
                (declare (not safe))
                (cons __tmp10643 __tmp10635))))
         (declare (not safe))
         (cons __tmp10644 __tmp10634))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#reserved-expander::t
        |gx[1]#_g10544_|
        'reserved-expander
        '#f
        '()
        '())))
    (define |gx[:0:]#macro-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10645_|
       'expander-identifiers:
       (let ((__tmp10656 |gx[1]#_g10503_|)
             (__tmp10646
              (let ((__tmp10655 |gx[1]#_g10645_|)
                    (__tmp10647
                     (let ((__tmp10653 |gx[1]#_g10654_|)
                           (__tmp10648
                            (let ((__tmp10651 |gx[1]#_g10652_|)
                                  (__tmp10649
                                   (let ((__tmp10650
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10650))))
                              (declare (not safe))
                              (cons __tmp10651 __tmp10649))))
                       (declare (not safe))
                       (cons __tmp10653 __tmp10648))))
                (declare (not safe))
                (cons __tmp10655 __tmp10647))))
         (declare (not safe))
         (cons __tmp10656 __tmp10646))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#core-macro::t
        |gx[1]#_g10544_|
        'macro-expander
        '#f
        '()
        '())))
    (define |gx[:0:]#rename-macro-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10657_|
       'expander-identifiers:
       (let ((__tmp10668 |gx[1]#_g10645_|)
             (__tmp10658
              (let ((__tmp10667 |gx[1]#_g10657_|)
                    (__tmp10659
                     (let ((__tmp10665 |gx[1]#_g10666_|)
                           (__tmp10660
                            (let ((__tmp10663 |gx[1]#_g10664_|)
                                  (__tmp10661
                                   (let ((__tmp10662
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp10662))))
                              (declare (not safe))
                              (cons __tmp10663 __tmp10661))))
                       (declare (not safe))
                       (cons __tmp10665 __tmp10660))))
                (declare (not safe))
                (cons __tmp10667 __tmp10659))))
         (declare (not safe))
         (cons __tmp10668 __tmp10658))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#rename-macro-expander::t
        |gx[1]#_g10669_|
        'rename-macro-expander
        '#f
        '()
        '())))
    (define |gx[:0:]#user-expander|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10670_|
       'expander-identifiers:
       (let ((__tmp10693 |gx[1]#_g10645_|)
             (__tmp10671
              (let ((__tmp10692 |gx[1]#_g10670_|)
                    (__tmp10672
                     (let ((__tmp10690 |gx[1]#_g10691_|)
                           (__tmp10673
                            (let ((__tmp10688 |gx[1]#_g10689_|)
                                  (__tmp10674
                                   (let ((__tmp10682
                                          (let ((__tmp10686 |gx[1]#_g10687_|)
                                                (__tmp10683
                                                 (let ((__tmp10684
                                                        |gx[1]#_g10685_|))
                                                   (declare (not safe))
                                                   (cons __tmp10684 '()))))
                                            (declare (not safe))
                                            (cons __tmp10686 __tmp10683)))
                                         (__tmp10675
                                          (let ((__tmp10676
                                                 (let ((__tmp10680
                                                        |gx[1]#_g10681_|)
                                                       (__tmp10677
                                                        (let ((__tmp10678
                                                               |gx[1]#_g10679_|))
                                                          (declare (not safe))
                                                          (cons __tmp10678
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp10680
                                                         __tmp10677))))
                                            (declare (not safe))
                                            (cons __tmp10676 '()))))
                                     (declare (not safe))
                                     (cons __tmp10682 __tmp10675))))
                              (declare (not safe))
                              (cons __tmp10688 __tmp10674))))
                       (declare (not safe))
                       (cons __tmp10690 __tmp10673))))
                (declare (not safe))
                (cons __tmp10692 __tmp10672))))
         (declare (not safe))
         (cons __tmp10693 __tmp10671))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#macro-expander::t
        |gx[1]#_g10669_|
        'user-expander
        '#f
        '()
        '(context phi))))
    (define |gx[:0:]#expander-mark|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gx[1]#_g10694_|
       'expander-identifiers:
       (let ((__tmp10695
              (let ((__tmp10728 |gx[1]#_g10694_|)
                    (__tmp10696
                     (let ((__tmp10726 |gx[1]#_g10727_|)
                           (__tmp10697
                            (let ((__tmp10724 |gx[1]#_g10725_|)
                                  (__tmp10698
                                   (let ((__tmp10712
                                          (let ((__tmp10722 |gx[1]#_g10723_|)
                                                (__tmp10713
                                                 (let ((__tmp10720
                                                        |gx[1]#_g10721_|)
                                                       (__tmp10714
                                                        (let ((__tmp10718
                                                               |gx[1]#_g10719_|)
                                                              (__tmp10715
                                                               (let ((__tmp10716
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10717_|))
                         (declare (not safe))
                         (cons __tmp10716 '()))))
                  (declare (not safe))
                  (cons __tmp10718 __tmp10715))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10720
                                                         __tmp10714))))
                                            (declare (not safe))
                                            (cons __tmp10722 __tmp10713)))
                                         (__tmp10699
                                          (let ((__tmp10700
                                                 (let ((__tmp10710
                                                        |gx[1]#_g10711_|)
                                                       (__tmp10701
                                                        (let ((__tmp10708
                                                               |gx[1]#_g10709_|)
                                                              (__tmp10702
                                                               (let ((__tmp10706
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gx[1]#_g10707_|)
                             (__tmp10703
                              (let ((__tmp10704 |gx[1]#_g10705_|))
                                (declare (not safe))
                                (cons __tmp10704 '()))))
                         (declare (not safe))
                         (cons __tmp10706 __tmp10703))))
                  (declare (not safe))
                  (cons __tmp10708 __tmp10702))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp10710
                                                         __tmp10701))))
                                            (declare (not safe))
                                            (cons __tmp10700 '()))))
                                     (declare (not safe))
                                     (cons __tmp10712 __tmp10699))))
                              (declare (not safe))
                              (cons __tmp10724 __tmp10698))))
                       (declare (not safe))
                       (cons __tmp10726 __tmp10697))))
                (declare (not safe))
                (cons __tmp10728 __tmp10696))))
         (declare (not safe))
         (cons '#f __tmp10695))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        'gx#expander-mark::t
        '#f
        'expander-mark
        '#f
        '()
        '(subst context phi trace))))
    (define |gx[:0:]#&phi-context?|
      (lambda (_$stx7121_)
        (let* ((_g71257139_
                (lambda (_g71267135_)
                  (let ()
                    (declare (not safe))
                    (gx#raise-syntax-error
                     '#f
                     '"Bad syntax; invalid match target"
                     _g71267135_))))
               (_g71247181_
                (lambda (_g71267143_)
                  (if (let () (declare (not safe)) (gx#stx-pair? _g71267143_))
                      (let ((_e71307146_
                             (let ()
                               (declare (not safe))
                               (gx#syntax-e _g71267143_))))
                        (let ((_hd71297150_
                               (let ()
                                 (declare (not safe))
                                 (##car _e71307146_)))
                              (_tl71287153_
                               (let ()
                                 (declare (not safe))
                                 (##cdr _e71307146_))))
                          (if (let ()
                                (declare (not safe))
                                (gx#stx-pair? _tl71287153_))
                              (let ((_e71337156_
                                     (let ()
                                       (declare (not safe))
                                       (gx#syntax-e _tl71287153_))))
                                (let ((_hd71327160_
                                       (let ()
                                         (declare (not safe))
                                         (##car _e71337156_)))
                                      (_tl71317163_
                                       (let ()
                                         (declare (not safe))
                                         (##cdr _e71337156_))))
                                  (if (let ()
                                        (declare (not safe))
                                        (gx#stx-null? _tl71317163_))
                                      ((lambda (_L7166_)
                                         (let ((__tmp10734
                                                (let ()
                                                  (declare (not safe))
                                                  (gx#datum->syntax__0
                                                   '#f
                                                   'fx>)))
                                               (__tmp10729
                                                (let ((__tmp10731
                                                       (let ((__tmp10733
                                                              (let ()
                                                                (declare
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                          (not safe))
                        (gx#datum->syntax__0 '#f '##vector-length)))
                     (__tmp10732
                      (let () (declare (not safe)) (cons _L7166_ '()))))
                 (declare (not safe))
                 (cons __tmp10733 __tmp10732)))
              (__tmp10730 (let () (declare (not safe)) (cons '3 '()))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                  (declare (not safe))
                                                  (cons __tmp10731
                                                        __tmp10730))))
                                           (declare (not safe))
                                           (cons __tmp10734 __tmp10729)))
                                       _hd71327160_)
                                      (_g71257139_ _g71267143_))))
                              (_g71257139_ _g71267143_))))
                      (_g71257139_ _g71267143_)))))
          (_g71247181_ _$stx7121_))))))
