(declare (block) (standard-bindings) (extended-bindings) (inlining-limit 200))
(begin
  (define |gxc[1]#_g20754_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20764_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-methods-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20766_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-ssxi-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20768_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-type-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20773_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-methods
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20775_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-ssxi
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20777_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info-type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20779_|
    (##structure
     gx#syntax-quote::t
     'optimizer-info?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20781_|
    (##structure
     gx#syntax-quote::t
     'make-optimizer-info
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20783_|
    (##structure
     gx#syntax-quote::t
     '!type::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20791_|
    (##structure
     gx#syntax-quote::t
     '!type-id-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20794_|
    (##structure
     gx#syntax-quote::t
     '!type-id
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20796_|
    (##structure
     gx#syntax-quote::t
     '!type?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20798_|
    (##structure
     gx#syntax-quote::t
     'make-!type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20800_|
    (##structure
     gx#syntax-quote::t
     '!alias::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20807_|
    (##structure
     gx#syntax-quote::t
     '!alias?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20809_|
    (##structure
     gx#syntax-quote::t
     'make-!alias
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20812_|
    (##structure
     gx#syntax-quote::t
     '!type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20813_|
    (##structure
     gx#syntax-quote::t
     '!struct-type::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20826_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-methods-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20828_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-plist-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20830_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-ctor-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20832_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-xfields-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20834_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-fields-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20836_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-super-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20844_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-methods
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20846_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-plist
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20848_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-ctor
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20850_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-xfields
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20852_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-fields
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20854_|
    (##structure
     gx#syntax-quote::t
     '!struct-type-super
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20856_|
    (##structure
     gx#syntax-quote::t
     '!struct-type?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20858_|
    (##structure
     gx#syntax-quote::t
     'make-!struct-type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20861_|
    (##structure
     gx#syntax-quote::t
     '!class-type::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20875_|
    (##structure
     gx#syntax-quote::t
     '!class-type-methods-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20877_|
    (##structure
     gx#syntax-quote::t
     '!class-type-plist-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20879_|
    (##structure
     gx#syntax-quote::t
     '!class-type-ctor-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20881_|
    (##structure
     gx#syntax-quote::t
     '!class-type-xslots-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20883_|
    (##structure
     gx#syntax-quote::t
     '!class-type-slots-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20885_|
    (##structure
     gx#syntax-quote::t
     '!class-type-mixin-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20887_|
    (##structure
     gx#syntax-quote::t
     '!class-type-super-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20896_|
    (##structure
     gx#syntax-quote::t
     '!class-type-methods
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20898_|
    (##structure
     gx#syntax-quote::t
     '!class-type-plist
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20900_|
    (##structure
     gx#syntax-quote::t
     '!class-type-ctor
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20902_|
    (##structure
     gx#syntax-quote::t
     '!class-type-xslots
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20904_|
    (##structure
     gx#syntax-quote::t
     '!class-type-slots
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20906_|
    (##structure
     gx#syntax-quote::t
     '!class-type-mixin
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20908_|
    (##structure
     gx#syntax-quote::t
     '!class-type-super
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20910_|
    (##structure
     gx#syntax-quote::t
     '!class-type?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20912_|
    (##structure
     gx#syntax-quote::t
     'make-!class-type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20915_|
    (##structure
     gx#syntax-quote::t
     '!procedure::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20922_|
    (##structure
     gx#syntax-quote::t
     '!procedure?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20924_|
    (##structure
     gx#syntax-quote::t
     'make-!procedure
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20927_|
    (##structure
     gx#syntax-quote::t
     '!struct-pred::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20934_|
    (##structure
     gx#syntax-quote::t
     '!struct-pred?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20936_|
    (##structure
     gx#syntax-quote::t
     'make-!struct-pred
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20939_|
    (##structure
     gx#syntax-quote::t
     '!procedure
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20940_|
    (##structure
     gx#syntax-quote::t
     '!struct-cons::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20947_|
    (##structure
     gx#syntax-quote::t
     '!struct-cons?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20949_|
    (##structure
     gx#syntax-quote::t
     'make-!struct-cons
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20952_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20961_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20963_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf-off-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20967_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20969_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf-off
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20971_|
    (##structure
     gx#syntax-quote::t
     '!struct-getf?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20973_|
    (##structure
     gx#syntax-quote::t
     'make-!struct-getf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20976_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20985_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20987_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf-off-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20991_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20993_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf-off
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20995_|
    (##structure
     gx#syntax-quote::t
     '!struct-setf?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g20997_|
    (##structure
     gx#syntax-quote::t
     'make-!struct-setf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21000_|
    (##structure
     gx#syntax-quote::t
     '!class-pred::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21007_|
    (##structure
     gx#syntax-quote::t
     '!class-pred?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21009_|
    (##structure
     gx#syntax-quote::t
     'make-!class-pred
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21012_|
    (##structure
     gx#syntax-quote::t
     '!class-cons::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21019_|
    (##structure
     gx#syntax-quote::t
     '!class-cons?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21021_|
    (##structure
     gx#syntax-quote::t
     'make-!class-cons
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21024_|
    (##structure
     gx#syntax-quote::t
     '!class-getf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21033_|
    (##structure
     gx#syntax-quote::t
     '!class-getf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21035_|
    (##structure
     gx#syntax-quote::t
     '!class-getf-slot-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21039_|
    (##structure
     gx#syntax-quote::t
     '!class-getf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21041_|
    (##structure
     gx#syntax-quote::t
     '!class-getf-slot
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21043_|
    (##structure
     gx#syntax-quote::t
     '!class-getf?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21045_|
    (##structure
     gx#syntax-quote::t
     'make-!class-getf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21048_|
    (##structure
     gx#syntax-quote::t
     '!class-setf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21057_|
    (##structure
     gx#syntax-quote::t
     '!class-setf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21059_|
    (##structure
     gx#syntax-quote::t
     '!class-setf-slot-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21063_|
    (##structure
     gx#syntax-quote::t
     '!class-setf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21065_|
    (##structure
     gx#syntax-quote::t
     '!class-setf-slot
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21067_|
    (##structure
     gx#syntax-quote::t
     '!class-setf?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21069_|
    (##structure
     gx#syntax-quote::t
     'make-!class-setf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21072_|
    (##structure
     gx#syntax-quote::t
     '!lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21083_|
    (##structure
     gx#syntax-quote::t
     '!lambda-inline-typedecl-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21085_|
    (##structure
     gx#syntax-quote::t
     '!lambda-inline-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21087_|
    (##structure
     gx#syntax-quote::t
     '!lambda-dispatch-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21089_|
    (##structure
     gx#syntax-quote::t
     '!lambda-arity-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21095_|
    (##structure
     gx#syntax-quote::t
     '!lambda-inline-typedecl
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21097_|
    (##structure
     gx#syntax-quote::t
     '!lambda-inline
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21099_|
    (##structure
     gx#syntax-quote::t
     '!lambda-dispatch
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21101_|
    (##structure
     gx#syntax-quote::t
     '!lambda-arity
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21103_|
    (##structure
     gx#syntax-quote::t
     '!lambda?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21105_|
    (##structure
     gx#syntax-quote::t
     'make-!lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21108_|
    (##structure
     gx#syntax-quote::t
     '!case-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21116_|
    (##structure
     gx#syntax-quote::t
     '!case-lambda-clauses-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21119_|
    (##structure
     gx#syntax-quote::t
     '!case-lambda-clauses
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21121_|
    (##structure
     gx#syntax-quote::t
     '!case-lambda?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21123_|
    (##structure
     gx#syntax-quote::t
     'make-!case-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21126_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21135_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-dispatch-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21137_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-table-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21141_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-dispatch
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21143_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-table
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21145_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21147_|
    (##structure
     gx#syntax-quote::t
     'make-!kw-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21150_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21159_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary-main-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21161_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary-keys-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21165_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary-main
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21167_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary-keys
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21169_|
    (##structure
     gx#syntax-quote::t
     '!kw-lambda-primary?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21171_|
    (##structure
     gx#syntax-quote::t
     'make-!kw-lambda-primary
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21174_|
    (##structure
     gx#syntax-quote::t
     '!primitive::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21181_|
    (##structure
     gx#syntax-quote::t
     '!primitive?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21183_|
    (##structure
     gx#syntax-quote::t
     'make-!primitive
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21185_|
    (##structure
     gx#syntax-quote::t
     '!primitive-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21192_|
    (##structure
     gx#syntax-quote::t
     '!primitive-lambda?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21194_|
    (##structure
     gx#syntax-quote::t
     'make-!primitive-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21200_|
    (##structure
     gx#syntax-quote::t
     '!primitive
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21201_|
    (##structure
     gx#syntax-quote::t
     '!lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21202_|
    (##structure
     gx#syntax-quote::t
     '!primitive-case-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21209_|
    (##structure
     gx#syntax-quote::t
     '!primitive-case-lambda?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21211_|
    (##structure
     gx#syntax-quote::t
     'make-!primitive-case-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g21217_|
    (##structure
     gx#syntax-quote::t
     '!case-lambda
     #f
     (gx#current-expander-context)
     '()))
  (begin
    (define |gxc[:0:]#optimizer-info|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20754_|
       'expander-identifiers:
       (let ((__tmp20755
              (let ((__tmp20782 |gxc[1]#_g20754_|)
                    (__tmp20756
                     (let ((__tmp20780 |gxc[1]#_g20781_|)
                           (__tmp20757
                            (let ((__tmp20778 |gxc[1]#_g20779_|)
                                  (__tmp20758
                                   (let ((__tmp20769
                                          (let ((__tmp20776 |gxc[1]#_g20777_|)
                                                (__tmp20770
                                                 (let ((__tmp20774
                                                        |gxc[1]#_g20775_|)
                                                       (__tmp20771
                                                        (let ((__tmp20772
                                                               |gxc[1]#_g20773_|))
                                                          (declare (not safe))
                                                          (cons __tmp20772
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp20774
                                                         __tmp20771))))
                                            (declare (not safe))
                                            (cons __tmp20776 __tmp20770)))
                                         (__tmp20759
                                          (let ((__tmp20760
                                                 (let ((__tmp20767
                                                        |gxc[1]#_g20768_|)
                                                       (__tmp20761
                                                        (let ((__tmp20765
                                                               |gxc[1]#_g20766_|)
                                                              (__tmp20762
                                                               (let ((__tmp20763
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g20764_|))
                         (declare (not safe))
                         (cons __tmp20763 '()))))
                  (declare (not safe))
                  (cons __tmp20765 __tmp20762))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp20767
                                                         __tmp20761))))
                                            (declare (not safe))
                                            (cons __tmp20760 '()))))
                                     (declare (not safe))
                                     (cons __tmp20769 __tmp20759))))
                              (declare (not safe))
                              (cons __tmp20778 __tmp20758))))
                       (declare (not safe))
                       (cons __tmp20780 __tmp20757))))
                (declare (not safe))
                (cons __tmp20782 __tmp20756))))
         (declare (not safe))
         (cons '#f __tmp20755))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        '#f
        'optimizer-info
        ':init!
        '()
        '(type ssxi methods))))
    (define |gxc[:0:]#!type|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20783_|
       'expander-identifiers:
       (let ((__tmp20784
              (let ((__tmp20799 |gxc[1]#_g20783_|)
                    (__tmp20785
                     (let ((__tmp20797 |gxc[1]#_g20798_|)
                           (__tmp20786
                            (let ((__tmp20795 |gxc[1]#_g20796_|)
                                  (__tmp20787
                                   (let ((__tmp20792
                                          (let ((__tmp20793 |gxc[1]#_g20794_|))
                                            (declare (not safe))
                                            (cons __tmp20793 '())))
                                         (__tmp20788
                                          (let ((__tmp20789
                                                 (let ((__tmp20790
                                                        |gxc[1]#_g20791_|))
                                                   (declare (not safe))
                                                   (cons __tmp20790 '()))))
                                            (declare (not safe))
                                            (cons __tmp20789 '()))))
                                     (declare (not safe))
                                     (cons __tmp20792 __tmp20788))))
                              (declare (not safe))
                              (cons __tmp20795 __tmp20787))))
                       (declare (not safe))
                       (cons __tmp20797 __tmp20786))))
                (declare (not safe))
                (cons __tmp20799 __tmp20785))))
         (declare (not safe))
         (cons '#f __tmp20784))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        '#f
        '!type
        '#f
        '()
        '(id))))
    (define |gxc[:0:]#!alias|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20800_|
       'expander-identifiers:
       (let ((__tmp20811 |gxc[1]#_g20783_|)
             (__tmp20801
              (let ((__tmp20810 |gxc[1]#_g20800_|)
                    (__tmp20802
                     (let ((__tmp20808 |gxc[1]#_g20809_|)
                           (__tmp20803
                            (let ((__tmp20806 |gxc[1]#_g20807_|)
                                  (__tmp20804
                                   (let ((__tmp20805
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp20805))))
                              (declare (not safe))
                              (cons __tmp20806 __tmp20804))))
                       (declare (not safe))
                       (cons __tmp20808 __tmp20803))))
                (declare (not safe))
                (cons __tmp20810 __tmp20802))))
         (declare (not safe))
         (cons __tmp20811 __tmp20801))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20812_|
        '!alias
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-type|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20813_|
       'expander-identifiers:
       (let ((__tmp20860 |gxc[1]#_g20783_|)
             (__tmp20814
              (let ((__tmp20859 |gxc[1]#_g20813_|)
                    (__tmp20815
                     (let ((__tmp20857 |gxc[1]#_g20858_|)
                           (__tmp20816
                            (let ((__tmp20855 |gxc[1]#_g20856_|)
                                  (__tmp20817
                                   (let ((__tmp20837
                                          (let ((__tmp20853 |gxc[1]#_g20854_|)
                                                (__tmp20838
                                                 (let ((__tmp20851
                                                        |gxc[1]#_g20852_|)
                                                       (__tmp20839
                                                        (let ((__tmp20849
                                                               |gxc[1]#_g20850_|)
                                                              (__tmp20840
                                                               (let ((__tmp20847
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g20848_|)
                             (__tmp20841
                              (let ((__tmp20845 |gxc[1]#_g20846_|)
                                    (__tmp20842
                                     (let ((__tmp20843 |gxc[1]#_g20844_|))
                                       (declare (not safe))
                                       (cons __tmp20843 '()))))
                                (declare (not safe))
                                (cons __tmp20845 __tmp20842))))
                         (declare (not safe))
                         (cons __tmp20847 __tmp20841))))
                  (declare (not safe))
                  (cons __tmp20849 __tmp20840))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp20851
                                                         __tmp20839))))
                                            (declare (not safe))
                                            (cons __tmp20853 __tmp20838)))
                                         (__tmp20818
                                          (let ((__tmp20819
                                                 (let ((__tmp20835
                                                        |gxc[1]#_g20836_|)
                                                       (__tmp20820
                                                        (let ((__tmp20833
                                                               |gxc[1]#_g20834_|)
                                                              (__tmp20821
                                                               (let ((__tmp20831
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g20832_|)
                             (__tmp20822
                              (let ((__tmp20829 |gxc[1]#_g20830_|)
                                    (__tmp20823
                                     (let ((__tmp20827 |gxc[1]#_g20828_|)
                                           (__tmp20824
                                            (let ((__tmp20825
                                                   |gxc[1]#_g20826_|))
                                              (declare (not safe))
                                              (cons __tmp20825 '()))))
                                       (declare (not safe))
                                       (cons __tmp20827 __tmp20824))))
                                (declare (not safe))
                                (cons __tmp20829 __tmp20823))))
                         (declare (not safe))
                         (cons __tmp20831 __tmp20822))))
                  (declare (not safe))
                  (cons __tmp20833 __tmp20821))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp20835
                                                         __tmp20820))))
                                            (declare (not safe))
                                            (cons __tmp20819 '()))))
                                     (declare (not safe))
                                     (cons __tmp20837 __tmp20818))))
                              (declare (not safe))
                              (cons __tmp20855 __tmp20817))))
                       (declare (not safe))
                       (cons __tmp20857 __tmp20816))))
                (declare (not safe))
                (cons __tmp20859 __tmp20815))))
         (declare (not safe))
         (cons __tmp20860 __tmp20814))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20812_|
        '!struct-type
        ':init!
        '()
        '(super fields xfields ctor plist methods))))
    (define |gxc[:0:]#!class-type|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20861_|
       'expander-identifiers:
       (let ((__tmp20914 |gxc[1]#_g20783_|)
             (__tmp20862
              (let ((__tmp20913 |gxc[1]#_g20861_|)
                    (__tmp20863
                     (let ((__tmp20911 |gxc[1]#_g20912_|)
                           (__tmp20864
                            (let ((__tmp20909 |gxc[1]#_g20910_|)
                                  (__tmp20865
                                   (let ((__tmp20888
                                          (let ((__tmp20907 |gxc[1]#_g20908_|)
                                                (__tmp20889
                                                 (let ((__tmp20905
                                                        |gxc[1]#_g20906_|)
                                                       (__tmp20890
                                                        (let ((__tmp20903
                                                               |gxc[1]#_g20904_|)
                                                              (__tmp20891
                                                               (let ((__tmp20901
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g20902_|)
                             (__tmp20892
                              (let ((__tmp20899 |gxc[1]#_g20900_|)
                                    (__tmp20893
                                     (let ((__tmp20897 |gxc[1]#_g20898_|)
                                           (__tmp20894
                                            (let ((__tmp20895
                                                   |gxc[1]#_g20896_|))
                                              (declare (not safe))
                                              (cons __tmp20895 '()))))
                                       (declare (not safe))
                                       (cons __tmp20897 __tmp20894))))
                                (declare (not safe))
                                (cons __tmp20899 __tmp20893))))
                         (declare (not safe))
                         (cons __tmp20901 __tmp20892))))
                  (declare (not safe))
                  (cons __tmp20903 __tmp20891))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp20905
                                                         __tmp20890))))
                                            (declare (not safe))
                                            (cons __tmp20907 __tmp20889)))
                                         (__tmp20866
                                          (let ((__tmp20867
                                                 (let ((__tmp20886
                                                        |gxc[1]#_g20887_|)
                                                       (__tmp20868
                                                        (let ((__tmp20884
                                                               |gxc[1]#_g20885_|)
                                                              (__tmp20869
                                                               (let ((__tmp20882
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g20883_|)
                             (__tmp20870
                              (let ((__tmp20880 |gxc[1]#_g20881_|)
                                    (__tmp20871
                                     (let ((__tmp20878 |gxc[1]#_g20879_|)
                                           (__tmp20872
                                            (let ((__tmp20876
                                                   |gxc[1]#_g20877_|)
                                                  (__tmp20873
                                                   (let ((__tmp20874
                                                          |gxc[1]#_g20875_|))
                                                     (declare (not safe))
                                                     (cons __tmp20874 '()))))
                                              (declare (not safe))
                                              (cons __tmp20876 __tmp20873))))
                                       (declare (not safe))
                                       (cons __tmp20878 __tmp20872))))
                                (declare (not safe))
                                (cons __tmp20880 __tmp20871))))
                         (declare (not safe))
                         (cons __tmp20882 __tmp20870))))
                  (declare (not safe))
                  (cons __tmp20884 __tmp20869))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp20886
                                                         __tmp20868))))
                                            (declare (not safe))
                                            (cons __tmp20867 '()))))
                                     (declare (not safe))
                                     (cons __tmp20888 __tmp20866))))
                              (declare (not safe))
                              (cons __tmp20909 __tmp20865))))
                       (declare (not safe))
                       (cons __tmp20911 __tmp20864))))
                (declare (not safe))
                (cons __tmp20913 __tmp20863))))
         (declare (not safe))
         (cons __tmp20914 __tmp20862))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20812_|
        '!class-type
        ':init!
        '()
        '(super mixin slots xslots ctor plist methods))))
    (define |gxc[:0:]#!procedure|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20915_|
       'expander-identifiers:
       (let ((__tmp20926 |gxc[1]#_g20783_|)
             (__tmp20916
              (let ((__tmp20925 |gxc[1]#_g20915_|)
                    (__tmp20917
                     (let ((__tmp20923 |gxc[1]#_g20924_|)
                           (__tmp20918
                            (let ((__tmp20921 |gxc[1]#_g20922_|)
                                  (__tmp20919
                                   (let ((__tmp20920
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp20920))))
                              (declare (not safe))
                              (cons __tmp20921 __tmp20919))))
                       (declare (not safe))
                       (cons __tmp20923 __tmp20918))))
                (declare (not safe))
                (cons __tmp20925 __tmp20917))))
         (declare (not safe))
         (cons __tmp20926 __tmp20916))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20812_|
        '!procedure
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-pred|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20927_|
       'expander-identifiers:
       (let ((__tmp20938 |gxc[1]#_g20915_|)
             (__tmp20928
              (let ((__tmp20937 |gxc[1]#_g20927_|)
                    (__tmp20929
                     (let ((__tmp20935 |gxc[1]#_g20936_|)
                           (__tmp20930
                            (let ((__tmp20933 |gxc[1]#_g20934_|)
                                  (__tmp20931
                                   (let ((__tmp20932
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp20932))))
                              (declare (not safe))
                              (cons __tmp20933 __tmp20931))))
                       (declare (not safe))
                       (cons __tmp20935 __tmp20930))))
                (declare (not safe))
                (cons __tmp20937 __tmp20929))))
         (declare (not safe))
         (cons __tmp20938 __tmp20928))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!struct-pred
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-cons|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20940_|
       'expander-identifiers:
       (let ((__tmp20951 |gxc[1]#_g20915_|)
             (__tmp20941
              (let ((__tmp20950 |gxc[1]#_g20940_|)
                    (__tmp20942
                     (let ((__tmp20948 |gxc[1]#_g20949_|)
                           (__tmp20943
                            (let ((__tmp20946 |gxc[1]#_g20947_|)
                                  (__tmp20944
                                   (let ((__tmp20945
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp20945))))
                              (declare (not safe))
                              (cons __tmp20946 __tmp20944))))
                       (declare (not safe))
                       (cons __tmp20948 __tmp20943))))
                (declare (not safe))
                (cons __tmp20950 __tmp20942))))
         (declare (not safe))
         (cons __tmp20951 __tmp20941))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!struct-cons
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-getf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20952_|
       'expander-identifiers:
       (let ((__tmp20975 |gxc[1]#_g20915_|)
             (__tmp20953
              (let ((__tmp20974 |gxc[1]#_g20952_|)
                    (__tmp20954
                     (let ((__tmp20972 |gxc[1]#_g20973_|)
                           (__tmp20955
                            (let ((__tmp20970 |gxc[1]#_g20971_|)
                                  (__tmp20956
                                   (let ((__tmp20964
                                          (let ((__tmp20968 |gxc[1]#_g20969_|)
                                                (__tmp20965
                                                 (let ((__tmp20966
                                                        |gxc[1]#_g20967_|))
                                                   (declare (not safe))
                                                   (cons __tmp20966 '()))))
                                            (declare (not safe))
                                            (cons __tmp20968 __tmp20965)))
                                         (__tmp20957
                                          (let ((__tmp20958
                                                 (let ((__tmp20962
                                                        |gxc[1]#_g20963_|)
                                                       (__tmp20959
                                                        (let ((__tmp20960
                                                               |gxc[1]#_g20961_|))
                                                          (declare (not safe))
                                                          (cons __tmp20960
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp20962
                                                         __tmp20959))))
                                            (declare (not safe))
                                            (cons __tmp20958 '()))))
                                     (declare (not safe))
                                     (cons __tmp20964 __tmp20957))))
                              (declare (not safe))
                              (cons __tmp20970 __tmp20956))))
                       (declare (not safe))
                       (cons __tmp20972 __tmp20955))))
                (declare (not safe))
                (cons __tmp20974 __tmp20954))))
         (declare (not safe))
         (cons __tmp20975 __tmp20953))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!struct-getf
        '#f
        '()
        '(off unchecked?))))
    (define |gxc[:0:]#!struct-setf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g20976_|
       'expander-identifiers:
       (let ((__tmp20999 |gxc[1]#_g20915_|)
             (__tmp20977
              (let ((__tmp20998 |gxc[1]#_g20976_|)
                    (__tmp20978
                     (let ((__tmp20996 |gxc[1]#_g20997_|)
                           (__tmp20979
                            (let ((__tmp20994 |gxc[1]#_g20995_|)
                                  (__tmp20980
                                   (let ((__tmp20988
                                          (let ((__tmp20992 |gxc[1]#_g20993_|)
                                                (__tmp20989
                                                 (let ((__tmp20990
                                                        |gxc[1]#_g20991_|))
                                                   (declare (not safe))
                                                   (cons __tmp20990 '()))))
                                            (declare (not safe))
                                            (cons __tmp20992 __tmp20989)))
                                         (__tmp20981
                                          (let ((__tmp20982
                                                 (let ((__tmp20986
                                                        |gxc[1]#_g20987_|)
                                                       (__tmp20983
                                                        (let ((__tmp20984
                                                               |gxc[1]#_g20985_|))
                                                          (declare (not safe))
                                                          (cons __tmp20984
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp20986
                                                         __tmp20983))))
                                            (declare (not safe))
                                            (cons __tmp20982 '()))))
                                     (declare (not safe))
                                     (cons __tmp20988 __tmp20981))))
                              (declare (not safe))
                              (cons __tmp20994 __tmp20980))))
                       (declare (not safe))
                       (cons __tmp20996 __tmp20979))))
                (declare (not safe))
                (cons __tmp20998 __tmp20978))))
         (declare (not safe))
         (cons __tmp20999 __tmp20977))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!struct-setf
        '#f
        '()
        '(off unchecked?))))
    (define |gxc[:0:]#!class-pred|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21000_|
       'expander-identifiers:
       (let ((__tmp21011 |gxc[1]#_g20915_|)
             (__tmp21001
              (let ((__tmp21010 |gxc[1]#_g21000_|)
                    (__tmp21002
                     (let ((__tmp21008 |gxc[1]#_g21009_|)
                           (__tmp21003
                            (let ((__tmp21006 |gxc[1]#_g21007_|)
                                  (__tmp21004
                                   (let ((__tmp21005
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp21005))))
                              (declare (not safe))
                              (cons __tmp21006 __tmp21004))))
                       (declare (not safe))
                       (cons __tmp21008 __tmp21003))))
                (declare (not safe))
                (cons __tmp21010 __tmp21002))))
         (declare (not safe))
         (cons __tmp21011 __tmp21001))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!class-pred
        '#f
        '()
        '())))
    (define |gxc[:0:]#!class-cons|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21012_|
       'expander-identifiers:
       (let ((__tmp21023 |gxc[1]#_g20915_|)
             (__tmp21013
              (let ((__tmp21022 |gxc[1]#_g21012_|)
                    (__tmp21014
                     (let ((__tmp21020 |gxc[1]#_g21021_|)
                           (__tmp21015
                            (let ((__tmp21018 |gxc[1]#_g21019_|)
                                  (__tmp21016
                                   (let ((__tmp21017
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp21017))))
                              (declare (not safe))
                              (cons __tmp21018 __tmp21016))))
                       (declare (not safe))
                       (cons __tmp21020 __tmp21015))))
                (declare (not safe))
                (cons __tmp21022 __tmp21014))))
         (declare (not safe))
         (cons __tmp21023 __tmp21013))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!class-cons
        '#f
        '()
        '())))
    (define |gxc[:0:]#!class-getf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21024_|
       'expander-identifiers:
       (let ((__tmp21047 |gxc[1]#_g20915_|)
             (__tmp21025
              (let ((__tmp21046 |gxc[1]#_g21024_|)
                    (__tmp21026
                     (let ((__tmp21044 |gxc[1]#_g21045_|)
                           (__tmp21027
                            (let ((__tmp21042 |gxc[1]#_g21043_|)
                                  (__tmp21028
                                   (let ((__tmp21036
                                          (let ((__tmp21040 |gxc[1]#_g21041_|)
                                                (__tmp21037
                                                 (let ((__tmp21038
                                                        |gxc[1]#_g21039_|))
                                                   (declare (not safe))
                                                   (cons __tmp21038 '()))))
                                            (declare (not safe))
                                            (cons __tmp21040 __tmp21037)))
                                         (__tmp21029
                                          (let ((__tmp21030
                                                 (let ((__tmp21034
                                                        |gxc[1]#_g21035_|)
                                                       (__tmp21031
                                                        (let ((__tmp21032
                                                               |gxc[1]#_g21033_|))
                                                          (declare (not safe))
                                                          (cons __tmp21032
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp21034
                                                         __tmp21031))))
                                            (declare (not safe))
                                            (cons __tmp21030 '()))))
                                     (declare (not safe))
                                     (cons __tmp21036 __tmp21029))))
                              (declare (not safe))
                              (cons __tmp21042 __tmp21028))))
                       (declare (not safe))
                       (cons __tmp21044 __tmp21027))))
                (declare (not safe))
                (cons __tmp21046 __tmp21026))))
         (declare (not safe))
         (cons __tmp21047 __tmp21025))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!class-getf
        '#f
        '()
        '(slot unchecked?))))
    (define |gxc[:0:]#!class-setf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21048_|
       'expander-identifiers:
       (let ((__tmp21071 |gxc[1]#_g20915_|)
             (__tmp21049
              (let ((__tmp21070 |gxc[1]#_g21048_|)
                    (__tmp21050
                     (let ((__tmp21068 |gxc[1]#_g21069_|)
                           (__tmp21051
                            (let ((__tmp21066 |gxc[1]#_g21067_|)
                                  (__tmp21052
                                   (let ((__tmp21060
                                          (let ((__tmp21064 |gxc[1]#_g21065_|)
                                                (__tmp21061
                                                 (let ((__tmp21062
                                                        |gxc[1]#_g21063_|))
                                                   (declare (not safe))
                                                   (cons __tmp21062 '()))))
                                            (declare (not safe))
                                            (cons __tmp21064 __tmp21061)))
                                         (__tmp21053
                                          (let ((__tmp21054
                                                 (let ((__tmp21058
                                                        |gxc[1]#_g21059_|)
                                                       (__tmp21055
                                                        (let ((__tmp21056
                                                               |gxc[1]#_g21057_|))
                                                          (declare (not safe))
                                                          (cons __tmp21056
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp21058
                                                         __tmp21055))))
                                            (declare (not safe))
                                            (cons __tmp21054 '()))))
                                     (declare (not safe))
                                     (cons __tmp21060 __tmp21053))))
                              (declare (not safe))
                              (cons __tmp21066 __tmp21052))))
                       (declare (not safe))
                       (cons __tmp21068 __tmp21051))))
                (declare (not safe))
                (cons __tmp21070 __tmp21050))))
         (declare (not safe))
         (cons __tmp21071 __tmp21049))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!class-setf
        '#f
        '()
        '(slot unchecked?))))
    (define |gxc[:0:]#!lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21072_|
       'expander-identifiers:
       (let ((__tmp21107 |gxc[1]#_g20915_|)
             (__tmp21073
              (let ((__tmp21106 |gxc[1]#_g21072_|)
                    (__tmp21074
                     (let ((__tmp21104 |gxc[1]#_g21105_|)
                           (__tmp21075
                            (let ((__tmp21102 |gxc[1]#_g21103_|)
                                  (__tmp21076
                                   (let ((__tmp21090
                                          (let ((__tmp21100 |gxc[1]#_g21101_|)
                                                (__tmp21091
                                                 (let ((__tmp21098
                                                        |gxc[1]#_g21099_|)
                                                       (__tmp21092
                                                        (let ((__tmp21096
                                                               |gxc[1]#_g21097_|)
                                                              (__tmp21093
                                                               (let ((__tmp21094
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g21095_|))
                         (declare (not safe))
                         (cons __tmp21094 '()))))
                  (declare (not safe))
                  (cons __tmp21096 __tmp21093))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp21098
                                                         __tmp21092))))
                                            (declare (not safe))
                                            (cons __tmp21100 __tmp21091)))
                                         (__tmp21077
                                          (let ((__tmp21078
                                                 (let ((__tmp21088
                                                        |gxc[1]#_g21089_|)
                                                       (__tmp21079
                                                        (let ((__tmp21086
                                                               |gxc[1]#_g21087_|)
                                                              (__tmp21080
                                                               (let ((__tmp21084
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                              |gxc[1]#_g21085_|)
                             (__tmp21081
                              (let ((__tmp21082 |gxc[1]#_g21083_|))
                                (declare (not safe))
                                (cons __tmp21082 '()))))
                         (declare (not safe))
                         (cons __tmp21084 __tmp21081))))
                  (declare (not safe))
                  (cons __tmp21086 __tmp21080))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                   (declare (not safe))
                                                   (cons __tmp21088
                                                         __tmp21079))))
                                            (declare (not safe))
                                            (cons __tmp21078 '()))))
                                     (declare (not safe))
                                     (cons __tmp21090 __tmp21077))))
                              (declare (not safe))
                              (cons __tmp21102 __tmp21076))))
                       (declare (not safe))
                       (cons __tmp21104 __tmp21075))))
                (declare (not safe))
                (cons __tmp21106 __tmp21074))))
         (declare (not safe))
         (cons __tmp21107 __tmp21073))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!lambda
        ':init!
        '()
        '(arity dispatch inline inline-typedecl))))
    (define |gxc[:0:]#!case-lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21108_|
       'expander-identifiers:
       (let ((__tmp21125 |gxc[1]#_g20915_|)
             (__tmp21109
              (let ((__tmp21124 |gxc[1]#_g21108_|)
                    (__tmp21110
                     (let ((__tmp21122 |gxc[1]#_g21123_|)
                           (__tmp21111
                            (let ((__tmp21120 |gxc[1]#_g21121_|)
                                  (__tmp21112
                                   (let ((__tmp21117
                                          (let ((__tmp21118 |gxc[1]#_g21119_|))
                                            (declare (not safe))
                                            (cons __tmp21118 '())))
                                         (__tmp21113
                                          (let ((__tmp21114
                                                 (let ((__tmp21115
                                                        |gxc[1]#_g21116_|))
                                                   (declare (not safe))
                                                   (cons __tmp21115 '()))))
                                            (declare (not safe))
                                            (cons __tmp21114 '()))))
                                     (declare (not safe))
                                     (cons __tmp21117 __tmp21113))))
                              (declare (not safe))
                              (cons __tmp21120 __tmp21112))))
                       (declare (not safe))
                       (cons __tmp21122 __tmp21111))))
                (declare (not safe))
                (cons __tmp21124 __tmp21110))))
         (declare (not safe))
         (cons __tmp21125 __tmp21109))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!case-lambda
        '#f
        '()
        '(clauses))))
    (define |gxc[:0:]#!kw-lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21126_|
       'expander-identifiers:
       (let ((__tmp21149 |gxc[1]#_g20915_|)
             (__tmp21127
              (let ((__tmp21148 |gxc[1]#_g21126_|)
                    (__tmp21128
                     (let ((__tmp21146 |gxc[1]#_g21147_|)
                           (__tmp21129
                            (let ((__tmp21144 |gxc[1]#_g21145_|)
                                  (__tmp21130
                                   (let ((__tmp21138
                                          (let ((__tmp21142 |gxc[1]#_g21143_|)
                                                (__tmp21139
                                                 (let ((__tmp21140
                                                        |gxc[1]#_g21141_|))
                                                   (declare (not safe))
                                                   (cons __tmp21140 '()))))
                                            (declare (not safe))
                                            (cons __tmp21142 __tmp21139)))
                                         (__tmp21131
                                          (let ((__tmp21132
                                                 (let ((__tmp21136
                                                        |gxc[1]#_g21137_|)
                                                       (__tmp21133
                                                        (let ((__tmp21134
                                                               |gxc[1]#_g21135_|))
                                                          (declare (not safe))
                                                          (cons __tmp21134
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp21136
                                                         __tmp21133))))
                                            (declare (not safe))
                                            (cons __tmp21132 '()))))
                                     (declare (not safe))
                                     (cons __tmp21138 __tmp21131))))
                              (declare (not safe))
                              (cons __tmp21144 __tmp21130))))
                       (declare (not safe))
                       (cons __tmp21146 __tmp21129))))
                (declare (not safe))
                (cons __tmp21148 __tmp21128))))
         (declare (not safe))
         (cons __tmp21149 __tmp21127))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!kw-lambda
        '#f
        '()
        '(table dispatch))))
    (define |gxc[:0:]#!kw-lambda-primary|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g21150_|
       'expander-identifiers:
       (let ((__tmp21173 |gxc[1]#_g20915_|)
             (__tmp21151
              (let ((__tmp21172 |gxc[1]#_g21150_|)
                    (__tmp21152
                     (let ((__tmp21170 |gxc[1]#_g21171_|)
                           (__tmp21153
                            (let ((__tmp21168 |gxc[1]#_g21169_|)
                                  (__tmp21154
                                   (let ((__tmp21162
                                          (let ((__tmp21166 |gxc[1]#_g21167_|)
                                                (__tmp21163
                                                 (let ((__tmp21164
                                                        |gxc[1]#_g21165_|))
                                                   (declare (not safe))
                                                   (cons __tmp21164 '()))))
                                            (declare (not safe))
                                            (cons __tmp21166 __tmp21163)))
                                         (__tmp21155
                                          (let ((__tmp21156
                                                 (let ((__tmp21160
                                                        |gxc[1]#_g21161_|)
                                                       (__tmp21157
                                                        (let ((__tmp21158
                                                               |gxc[1]#_g21159_|))
                                                          (declare (not safe))
                                                          (cons __tmp21158
                                                                '()))))
                                                   (declare (not safe))
                                                   (cons __tmp21160
                                                         __tmp21157))))
                                            (declare (not safe))
                                            (cons __tmp21156 '()))))
                                     (declare (not safe))
                                     (cons __tmp21162 __tmp21155))))
                              (declare (not safe))
                              (cons __tmp21168 __tmp21154))))
                       (declare (not safe))
                       (cons __tmp21170 __tmp21153))))
                (declare (not safe))
                (cons __tmp21172 __tmp21152))))
         (declare (not safe))
         (cons __tmp21173 __tmp21151))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g20939_|
        '!kw-lambda-primary
        '#f
        '()
        '(keys main))))
    (define |gxc[:0:]#!primitive|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-class-info|
       'runtime-identifier:
       |gxc[1]#_g21174_|
       'expander-identifiers:
       (let ((__tmp21175
              (let ((__tmp21184 |gxc[1]#_g21174_|)
                    (__tmp21176
                     (let ((__tmp21182 |gxc[1]#_g21183_|)
                           (__tmp21177
                            (let ((__tmp21180 |gxc[1]#_g21181_|)
                                  (__tmp21178
                                   (let ((__tmp21179
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp21179))))
                              (declare (not safe))
                              (cons __tmp21180 __tmp21178))))
                       (declare (not safe))
                       (cons __tmp21182 __tmp21177))))
                (declare (not safe))
                (cons __tmp21184 __tmp21176))))
         (declare (not safe))
         (cons '() __tmp21175))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-class-exhibitor|
        '#f
        (list)
        '!primitive
        '#f
        '()
        '())))
    (define |gxc[:0:]#!primitive-lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-class-info|
       'runtime-identifier:
       |gxc[1]#_g21185_|
       'expander-identifiers:
       (let ((__tmp21196
              (let ((__tmp21199 |gxc[1]#_g21174_|)
                    (__tmp21197
                     (let ((__tmp21198 |gxc[1]#_g21072_|))
                       (declare (not safe))
                       (cons __tmp21198 '()))))
                (declare (not safe))
                (cons __tmp21199 __tmp21197)))
             (__tmp21186
              (let ((__tmp21195 |gxc[1]#_g21185_|)
                    (__tmp21187
                     (let ((__tmp21193 |gxc[1]#_g21194_|)
                           (__tmp21188
                            (let ((__tmp21191 |gxc[1]#_g21192_|)
                                  (__tmp21189
                                   (let ((__tmp21190
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp21190))))
                              (declare (not safe))
                              (cons __tmp21191 __tmp21189))))
                       (declare (not safe))
                       (cons __tmp21193 __tmp21188))))
                (declare (not safe))
                (cons __tmp21195 __tmp21187))))
         (declare (not safe))
         (cons __tmp21196 __tmp21186))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-class-exhibitor|
        '#f
        (list |gxc[1]#_g21200_| |gxc[1]#_g21201_|)
        '!primitive-lambda
        ':init!
        '()
        '())))
    (define |gxc[:0:]#!primitive-case-lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-class-info|
       'runtime-identifier:
       |gxc[1]#_g21202_|
       'expander-identifiers:
       (let ((__tmp21213
              (let ((__tmp21216 |gxc[1]#_g21174_|)
                    (__tmp21214
                     (let ((__tmp21215 |gxc[1]#_g21108_|))
                       (declare (not safe))
                       (cons __tmp21215 '()))))
                (declare (not safe))
                (cons __tmp21216 __tmp21214)))
             (__tmp21203
              (let ((__tmp21212 |gxc[1]#_g21202_|)
                    (__tmp21204
                     (let ((__tmp21210 |gxc[1]#_g21211_|)
                           (__tmp21205
                            (let ((__tmp21208 |gxc[1]#_g21209_|)
                                  (__tmp21206
                                   (let ((__tmp21207
                                          (let ()
                                            (declare (not safe))
                                            (cons '() '()))))
                                     (declare (not safe))
                                     (cons '() __tmp21207))))
                              (declare (not safe))
                              (cons __tmp21208 __tmp21206))))
                       (declare (not safe))
                       (cons __tmp21210 __tmp21205))))
                (declare (not safe))
                (cons __tmp21212 __tmp21204))))
         (declare (not safe))
         (cons __tmp21213 __tmp21203))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-class-exhibitor|
        '#f
        (list |gxc[1]#_g21200_| |gxc[1]#_g21217_|)
        '!primitive-case-lambda
        ':init!
        '()
        '())))))
