(declare (block) (standard-bindings) (extended-bindings))
(begin
  (define |gxc[1]#_g34959_|
    (gx#make-syntax-quote
     'optimizer-info::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34960_|
    (gx#make-syntax-quote
     'optimizer-info::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34961_|
    (gx#make-syntax-quote
     'make-optimizer-info
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34962_|
    (gx#make-syntax-quote
     'optimizer-info?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34963_|
    (gx#make-syntax-quote
     'optimizer-info-type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34964_|
    (gx#make-syntax-quote
     'optimizer-info-ssxi
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34965_|
    (gx#make-syntax-quote
     'optimizer-info-type-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34966_|
    (gx#make-syntax-quote
     'optimizer-info-ssxi-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34967_|
    (gx#make-syntax-quote '!type::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34968_|
    (gx#make-syntax-quote '!type::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34969_|
    (gx#make-syntax-quote 'make-!type #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34970_|
    (gx#make-syntax-quote '!type? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34971_|
    (gx#make-syntax-quote '!type-id #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34972_|
    (gx#make-syntax-quote '!type-id-set! #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34973_|
    (gx#make-syntax-quote '!alias::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34974_|
    (gx#make-syntax-quote '!type::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34975_|
    (gx#make-syntax-quote '!alias::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34976_|
    (gx#make-syntax-quote 'make-!alias #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34977_|
    (gx#make-syntax-quote '!alias? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34978_|
    (gx#make-syntax-quote '!type #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34979_|
    (gx#make-syntax-quote
     '!struct-type::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34980_|
    (gx#make-syntax-quote '!type::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34981_|
    (gx#make-syntax-quote
     '!struct-type::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34982_|
    (gx#make-syntax-quote
     'make-!struct-type
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34983_|
    (gx#make-syntax-quote '!struct-type? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34984_|
    (gx#make-syntax-quote
     '!struct-type-super
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34985_|
    (gx#make-syntax-quote
     '!struct-type-fields
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34986_|
    (gx#make-syntax-quote
     '!struct-type-xfields
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34987_|
    (gx#make-syntax-quote
     '!struct-type-ctor
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34988_|
    (gx#make-syntax-quote
     '!struct-type-plist
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34989_|
    (gx#make-syntax-quote
     '!struct-type-methods
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34990_|
    (gx#make-syntax-quote
     '!struct-type-super-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34991_|
    (gx#make-syntax-quote
     '!struct-type-fields-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34992_|
    (gx#make-syntax-quote
     '!struct-type-xfields-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34993_|
    (gx#make-syntax-quote
     '!struct-type-ctor-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34994_|
    (gx#make-syntax-quote
     '!struct-type-plist-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34995_|
    (gx#make-syntax-quote
     '!struct-type-methods-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g34996_|
    (gx#make-syntax-quote '!type #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34997_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34998_|
    (gx#make-syntax-quote '!type::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g34999_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35000_|
    (gx#make-syntax-quote
     'make-!procedure
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35001_|
    (gx#make-syntax-quote '!procedure? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35002_|
    (gx#make-syntax-quote '!type #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35003_|
    (gx#make-syntax-quote
     '!struct-pred::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35004_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35005_|
    (gx#make-syntax-quote
     '!struct-pred::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35006_|
    (gx#make-syntax-quote
     'make-!struct-pred
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35007_|
    (gx#make-syntax-quote '!struct-pred? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35008_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35009_|
    (gx#make-syntax-quote
     '!struct-cons::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35010_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35011_|
    (gx#make-syntax-quote
     '!struct-cons::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35012_|
    (gx#make-syntax-quote
     'make-!struct-cons
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35013_|
    (gx#make-syntax-quote '!struct-cons? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35014_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35015_|
    (gx#make-syntax-quote
     '!struct-getf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35016_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35017_|
    (gx#make-syntax-quote
     '!struct-getf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35018_|
    (gx#make-syntax-quote
     'make-!struct-getf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35019_|
    (gx#make-syntax-quote '!struct-getf? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35020_|
    (gx#make-syntax-quote
     '!struct-getf-off
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35021_|
    (gx#make-syntax-quote
     '!struct-getf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35022_|
    (gx#make-syntax-quote
     '!struct-getf-off-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35023_|
    (gx#make-syntax-quote
     '!struct-getf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35024_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35025_|
    (gx#make-syntax-quote
     '!struct-setf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35026_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35027_|
    (gx#make-syntax-quote
     '!struct-setf::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35028_|
    (gx#make-syntax-quote
     'make-!struct-setf
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35029_|
    (gx#make-syntax-quote '!struct-setf? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35030_|
    (gx#make-syntax-quote
     '!struct-setf-off
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35031_|
    (gx#make-syntax-quote
     '!struct-setf-unchecked?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35032_|
    (gx#make-syntax-quote
     '!struct-setf-off-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35033_|
    (gx#make-syntax-quote
     '!struct-setf-unchecked?-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35034_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35035_|
    (gx#make-syntax-quote '!lambda::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35036_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35037_|
    (gx#make-syntax-quote '!lambda::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35038_|
    (gx#make-syntax-quote 'make-!lambda #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35039_|
    (gx#make-syntax-quote '!lambda? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35040_|
    (gx#make-syntax-quote '!lambda-arity #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35041_|
    (gx#make-syntax-quote
     '!lambda-dispatch
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35042_|
    (gx#make-syntax-quote
     '!lambda-inline
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35043_|
    (gx#make-syntax-quote
     '!lambda-inline-typedecl
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35044_|
    (gx#make-syntax-quote
     '!lambda-arity-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35045_|
    (gx#make-syntax-quote
     '!lambda-dispatch-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35046_|
    (gx#make-syntax-quote
     '!lambda-inline-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35047_|
    (gx#make-syntax-quote
     '!lambda-inline-typedecl-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35048_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35049_|
    (gx#make-syntax-quote
     '!case-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35050_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35051_|
    (gx#make-syntax-quote
     '!case-lambda::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35052_|
    (gx#make-syntax-quote
     'make-!case-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35053_|
    (gx#make-syntax-quote '!case-lambda? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35054_|
    (gx#make-syntax-quote
     '!case-lambda-clauses
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35055_|
    (gx#make-syntax-quote
     '!case-lambda-clauses-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35056_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35057_|
    (gx#make-syntax-quote '!kw-lambda::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35058_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35059_|
    (gx#make-syntax-quote '!kw-lambda::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35060_|
    (gx#make-syntax-quote
     'make-!kw-lambda
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35061_|
    (gx#make-syntax-quote '!kw-lambda? #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35062_|
    (gx#make-syntax-quote
     '!kw-lambda-table
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35063_|
    (gx#make-syntax-quote
     '!kw-lambda-dispatch
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35064_|
    (gx#make-syntax-quote
     '!kw-lambda-table-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35065_|
    (gx#make-syntax-quote
     '!kw-lambda-dispatch-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35066_|
    (gx#make-syntax-quote '!procedure #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35067_|
    (gx#make-syntax-quote
     '!kw-lambda-primary::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35068_|
    (gx#make-syntax-quote '!procedure::t #f (gx#current-expander-context) '()))
  (define |gxc[1]#_g35069_|
    (gx#make-syntax-quote
     '!kw-lambda-primary::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35070_|
    (gx#make-syntax-quote
     'make-!kw-lambda-primary
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35071_|
    (gx#make-syntax-quote
     '!kw-lambda-primary?
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35072_|
    (gx#make-syntax-quote
     '!kw-lambda-primary-keys
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35073_|
    (gx#make-syntax-quote
     '!kw-lambda-primary-main
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35074_|
    (gx#make-syntax-quote
     '!kw-lambda-primary-keys-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35075_|
    (gx#make-syntax-quote
     '!kw-lambda-primary-main-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gxc[1]#_g35076_|
    (gx#make-syntax-quote '!procedure #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]#_g34959_|
       'expander-identifiers:
       (cons '#f
             (cons |gxc[1]#_g34960_|
                   (cons |gxc[1]#_g34961_|
                         (cons |gxc[1]#_g34962_|
                               (cons (cons |gxc[1]#_g34963_|
                                           (cons |gxc[1]#_g34964_| '()))
                                     (cons (cons |gxc[1]#_g34965_|
                                                 (cons |gxc[1]#_g34966_| '()))
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        '#f
        'optimizer-info
        ':init!
        '()
        '(type ssxi))))
    (define |gxc[:0:]#!type|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g34967_|
       'expander-identifiers:
       (cons '#f
             (cons |gxc[1]#_g34968_|
                   (cons |gxc[1]#_g34969_|
                         (cons |gxc[1]#_g34970_|
                               (cons (cons |gxc[1]#_g34971_| '())
                                     (cons (cons |gxc[1]#_g34972_| '())
                                           '()))))))
       '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]#_g34973_|
       'expander-identifiers:
       (cons |gxc[1]#_g34974_|
             (cons |gxc[1]#_g34975_|
                   (cons |gxc[1]#_g34976_|
                         (cons |gxc[1]#_g34977_| (cons '() (cons '() '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g34978_|
        '!alias
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-type|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g34979_|
       'expander-identifiers:
       (cons |gxc[1]#_g34980_|
             (cons |gxc[1]#_g34981_|
                   (cons |gxc[1]#_g34982_|
                         (cons |gxc[1]#_g34983_|
                               (cons (cons |gxc[1]#_g34984_|
                                           (cons |gxc[1]#_g34985_|
                                                 (cons |gxc[1]#_g34986_|
                                                       (cons |gxc[1]#_g34987_|
                                                             (cons |gxc[1]#_g34988_|
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                           (cons |gxc[1]#_g34989_| '()))))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                     (cons (cons |gxc[1]#_g34990_|
                                                 (cons |gxc[1]#_g34991_|
                                                       (cons |gxc[1]#_g34992_|
                                                             (cons |gxc[1]#_g34993_|
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                           (cons |gxc[1]#_g34994_|
                                 (cons |gxc[1]#_g34995_| '()))))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g34996_|
        '!struct-type
        ':init!
        '()
        '(super fields xfields ctor plist methods))))
    (define |gxc[:0:]#!procedure|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g34997_|
       'expander-identifiers:
       (cons |gxc[1]#_g34998_|
             (cons |gxc[1]#_g34999_|
                   (cons |gxc[1]#_g35000_|
                         (cons |gxc[1]#_g35001_| (cons '() (cons '() '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35002_|
        '!procedure
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-pred|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35003_|
       'expander-identifiers:
       (cons |gxc[1]#_g35004_|
             (cons |gxc[1]#_g35005_|
                   (cons |gxc[1]#_g35006_|
                         (cons |gxc[1]#_g35007_| (cons '() (cons '() '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35008_|
        '!struct-pred
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-cons|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35009_|
       'expander-identifiers:
       (cons |gxc[1]#_g35010_|
             (cons |gxc[1]#_g35011_|
                   (cons |gxc[1]#_g35012_|
                         (cons |gxc[1]#_g35013_| (cons '() (cons '() '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35014_|
        '!struct-cons
        '#f
        '()
        '())))
    (define |gxc[:0:]#!struct-getf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35015_|
       'expander-identifiers:
       (cons |gxc[1]#_g35016_|
             (cons |gxc[1]#_g35017_|
                   (cons |gxc[1]#_g35018_|
                         (cons |gxc[1]#_g35019_|
                               (cons (cons |gxc[1]#_g35020_|
                                           (cons |gxc[1]#_g35021_| '()))
                                     (cons (cons |gxc[1]#_g35022_|
                                                 (cons |gxc[1]#_g35023_| '()))
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35024_|
        '!struct-getf
        '#f
        '()
        '(off unchecked?))))
    (define |gxc[:0:]#!struct-setf|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35025_|
       'expander-identifiers:
       (cons |gxc[1]#_g35026_|
             (cons |gxc[1]#_g35027_|
                   (cons |gxc[1]#_g35028_|
                         (cons |gxc[1]#_g35029_|
                               (cons (cons |gxc[1]#_g35030_|
                                           (cons |gxc[1]#_g35031_| '()))
                                     (cons (cons |gxc[1]#_g35032_|
                                                 (cons |gxc[1]#_g35033_| '()))
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35034_|
        '!struct-setf
        '#f
        '()
        '(off unchecked?))))
    (define |gxc[:0:]#!lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35035_|
       'expander-identifiers:
       (cons |gxc[1]#_g35036_|
             (cons |gxc[1]#_g35037_|
                   (cons |gxc[1]#_g35038_|
                         (cons |gxc[1]#_g35039_|
                               (cons (cons |gxc[1]#_g35040_|
                                           (cons |gxc[1]#_g35041_|
                                                 (cons |gxc[1]#_g35042_|
                                                       (cons |gxc[1]#_g35043_|
                                                             '()))))
                                     (cons (cons |gxc[1]#_g35044_|
                                                 (cons |gxc[1]#_g35045_|
                                                       (cons |gxc[1]#_g35046_|
                                                             (cons |gxc[1]#_g35047_|
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                           '()))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35048_|
        '!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]#_g35049_|
       'expander-identifiers:
       (cons |gxc[1]#_g35050_|
             (cons |gxc[1]#_g35051_|
                   (cons |gxc[1]#_g35052_|
                         (cons |gxc[1]#_g35053_|
                               (cons (cons |gxc[1]#_g35054_| '())
                                     (cons (cons |gxc[1]#_g35055_| '())
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35056_|
        '!case-lambda
        '#f
        '()
        '(clauses))))
    (define |gxc[:0:]#!kw-lambda|
      (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
       'runtime-identifier:
       |gxc[1]#_g35057_|
       'expander-identifiers:
       (cons |gxc[1]#_g35058_|
             (cons |gxc[1]#_g35059_|
                   (cons |gxc[1]#_g35060_|
                         (cons |gxc[1]#_g35061_|
                               (cons (cons |gxc[1]#_g35062_|
                                           (cons |gxc[1]#_g35063_| '()))
                                     (cons (cons |gxc[1]#_g35064_|
                                                 (cons |gxc[1]#_g35065_| '()))
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35066_|
        '!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]#_g35067_|
       'expander-identifiers:
       (cons |gxc[1]#_g35068_|
             (cons |gxc[1]#_g35069_|
                   (cons |gxc[1]#_g35070_|
                         (cons |gxc[1]#_g35071_|
                               (cons (cons |gxc[1]#_g35072_|
                                           (cons |gxc[1]#_g35073_| '()))
                                     (cons (cons |gxc[1]#_g35074_|
                                                 (cons |gxc[1]#_g35075_| '()))
                                           '()))))))
       'type-exhibitor:
       (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
        '#f
        |gxc[1]#_g35076_|
        '!kw-lambda-primary
        '#f
        '()
        '(keys main))))
    (define |gxc[:0:]#defbasic-expression-type-builtin|
      (lambda (_$stx12965_)
        (let* ((_g1296912998_
                (lambda (_g1297012994_)
                  (gx#raise-syntax-error '#f '"Bad syntax" _g1297012994_)))
               (_g1296813099_
                (lambda (_g1297013002_)
                  (if (gx#stx-pair? _g1297013002_)
                      (let ((_e1297313005_ (gx#syntax-e _g1297013002_)))
                        (let ((_hd1297413009_ (##car _e1297313005_))
                              (_tl1297513012_ (##cdr _e1297313005_)))
                          (if (gx#stx-pair/null? _tl1297513012_)
                              (if (fx>= (gx#stx-length _tl1297513012_) '0)
                                  (let ((_g35077_
                                         (gx#syntax-split-splice
                                          _tl1297513012_
                                          '0)))
                                    (begin
                                      (let ((_g35078_
                                             (if (##values? _g35077_)
                                                 (##vector-length _g35077_)
                                                 1)))
                                        (if (not (##fx= _g35078_ 2))
                                            (error "Context expects 2 values"
                                                   _g35078_)))
                                      (let ((_target1297613015_
                                             (##vector-ref _g35077_ 0))
                                            (_tl1297813018_
                                             (##vector-ref _g35077_ 1)))
                                        (if (gx#stx-null? _tl1297813018_)
                                            (letrec ((_loop1297913021_
                                                      (lambda (_hd1297713025_
                                                               _type-e1298313028_
                                                               _id1298413030_)
                                                        (if (gx#stx-pair?
                                                             _hd1297713025_)
                                                            (let ((_e1298013033_
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                           (gx#syntax-e _hd1297713025_)))
                      (let ((_lp-hd1298113037_ (##car _e1298013033_))
                            (_lp-tl1298213040_ (##cdr _e1298013033_)))
                        (if (gx#stx-pair? _lp-hd1298113037_)
                            (let ((_e1298713043_
                                   (gx#syntax-e _lp-hd1298113037_)))
                              (let ((_hd1298813047_ (##car _e1298713043_))
                                    (_tl1298913050_ (##cdr _e1298713043_)))
                                (if (gx#stx-pair? _tl1298913050_)
                                    (let ((_e1299013053_
                                           (gx#syntax-e _tl1298913050_)))
                                      (let ((_hd1299113057_
                                             (##car _e1299013053_))
                                            (_tl1299213060_
                                             (##cdr _e1299013053_)))
                                        (if (gx#stx-null? _tl1299213060_)
                                            (_loop1297913021_
                                             _lp-tl1298213040_
                                             (cons _hd1299113057_
                                                   _type-e1298313028_)
                                             (cons _hd1298813047_
                                                   _id1298413030_))
                                            (_g1296912998_ _g1297013002_))))
                                    (_g1296912998_ _g1297013002_))))
                            (_g1296912998_ _g1297013002_))))
                    (let ((_type-e1298513063_ (reverse _type-e1298313028_))
                          (_id1298613066_ (reverse _id1298413030_)))
                      ((lambda (_L13069_ _L13071_)
                         (cons (gx#datum->syntax '#f 'begin)
                               (begin
                                 (gx#syntax-check-splice-targets
                                  _L13069_
                                  _L13071_)
                                 (foldr (lambda (_g1308713091_
                                                 _g1308813094_
                                                 _g1308913096_)
                                          (cons (cons (gx#datum->syntax
                                                       '#f
                                                       'hash-put!)
                                                      (cons (gx#datum->syntax
                                                             '#f
                                                             'basic-expression-type-builtin)
                                                            (cons (cons (gx#datum->syntax
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                                 '#f
                                 'quote)
                                (cons _g1308813094_ '()))
                          (cons _g1308713091_ '()))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                                _g1308913096_))
                                        '()
                                        _L13069_
                                        _L13071_))))
                       _type-e1298513063_
                       _id1298613066_))))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                              (_loop1297913021_
                                               _target1297613015_
                                               '()
                                               '()))
                                            (_g1296912998_ _g1297013002_)))))
                                  (_g1296912998_ _g1297013002_))
                              (_g1296912998_ _g1297013002_))))
                      (_g1296912998_ _g1297013002_)))))
          (_g1296813099_ _$stx12965_))))))
