(declare (block) (standard-bindings) (extended-bindings) (inlining-limit 200))
(begin
  (define |gx[1]#_g118104_|
    (##structure gx#syntax-quote::t 'AST #f (gx#current-expander-context) '()))
  (define |gx[1]#_g118106_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118108_|
    (##structure
     gx#syntax-quote::t
     'make-identifier-wrap
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118110_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118112_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-marks
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118113_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118114_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118116_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-marks-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118117_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118118_|
    (##structure
     gx#syntax-quote::t
     'identifier-wrap-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118120_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-marks
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118121_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118122_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118124_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-marks-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118125_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118126_|
    (##structure
     gx#syntax-quote::t
     '&identifier-wrap-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118129_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118131_|
    (##structure
     gx#syntax-quote::t
     'make-syntax-wrap
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118133_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118135_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-mark
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118136_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118137_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118139_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-mark-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118140_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118141_|
    (##structure
     gx#syntax-quote::t
     'syntax-wrap-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118143_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-mark
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118144_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118145_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118147_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-mark-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118148_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118149_|
    (##structure
     gx#syntax-quote::t
     '&syntax-wrap-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118152_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118154_|
    (##structure
     gx#syntax-quote::t
     'make-syntax-quote
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118156_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote?
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118158_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118159_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-marks
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118160_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118161_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118163_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118164_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-marks-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118165_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118166_|
    (##structure
     gx#syntax-quote::t
     'syntax-quote-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118168_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-context
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118169_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-marks
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118170_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-e
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118171_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-source
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118173_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-context-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118174_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-marks-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118175_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-e-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gx[1]#_g118176_|
    (##structure
     gx#syntax-quote::t
     '&syntax-quote-source-set!
     #f
     (gx#current-expander-context)
     '()))
  (begin
    (define |gx[:0:]#identifier-wrap|
      (let ((__obj118086
             (let ()
               (declare (not safe))
               (##structure
                gerbil/core/mop~MOP-2#class-type-info::t
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f))))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set!
           __obj118086
           'gx#identifier-wrap::t
           '1
           '#f
           '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 'syntax '2 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '(marks) '4 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set!
           __obj118086
           '(e source marks)
           '6
           '#f
           '#f))
        (let ((__tmp118103 (cons |gx[1]#_g118104_| '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118103 '3 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '#t '7 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '#t '8 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '#f '10 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '#f '11 '#f '#f))
        (let ((__tmp118105 |gx[1]#_g118106_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118105 '12 '#f '#f))
        (let ((__tmp118107 |gx[1]#_g118108_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118107 '13 '#f '#f))
        (let ((__tmp118109 |gx[1]#_g118110_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118109 '14 '#f '#f))
        (let ((__tmp118111
               (cons (cons 'marks |gx[1]#_g118112_|)
                     (cons (cons 'e |gx[1]#_g118113_|)
                           (cons (cons 'source |gx[1]#_g118114_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118111 '15 '#f '#f))
        (let ((__tmp118115
               (cons (cons 'marks |gx[1]#_g118116_|)
                     (cons (cons 'e |gx[1]#_g118117_|)
                           (cons (cons 'source |gx[1]#_g118118_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118115 '16 '#f '#f))
        (let ((__tmp118119
               (cons (cons 'marks |gx[1]#_g118120_|)
                     (cons (cons 'e |gx[1]#_g118121_|)
                           (cons (cons 'source |gx[1]#_g118122_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118119 '17 '#f '#f))
        (let ((__tmp118123
               (cons (cons 'marks |gx[1]#_g118124_|)
                     (cons (cons 'e |gx[1]#_g118125_|)
                           (cons (cons 'source |gx[1]#_g118126_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 __tmp118123 '18 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '() '19 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '() '21 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118086 '() '20 '#f '#f))
        __obj118086))
    (define |gx[:0:]#syntax-wrap|
      (let ((__obj118087
             (let ()
               (declare (not safe))
               (##structure
                gerbil/core/mop~MOP-2#class-type-info::t
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f))))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set!
           __obj118087
           'gx#syntax-wrap::t
           '1
           '#f
           '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 'syntax '2 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '(mark) '4 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '(e source mark) '6 '#f '#f))
        (let ((__tmp118127 (cons |gx[1]#_g118104_| '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118127 '3 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '#t '7 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '#t '8 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '#f '10 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '#f '11 '#f '#f))
        (let ((__tmp118128 |gx[1]#_g118129_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118128 '12 '#f '#f))
        (let ((__tmp118130 |gx[1]#_g118131_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118130 '13 '#f '#f))
        (let ((__tmp118132 |gx[1]#_g118133_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118132 '14 '#f '#f))
        (let ((__tmp118134
               (cons (cons 'mark |gx[1]#_g118135_|)
                     (cons (cons 'e |gx[1]#_g118136_|)
                           (cons (cons 'source |gx[1]#_g118137_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118134 '15 '#f '#f))
        (let ((__tmp118138
               (cons (cons 'mark |gx[1]#_g118139_|)
                     (cons (cons 'e |gx[1]#_g118140_|)
                           (cons (cons 'source |gx[1]#_g118141_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118138 '16 '#f '#f))
        (let ((__tmp118142
               (cons (cons 'mark |gx[1]#_g118143_|)
                     (cons (cons 'e |gx[1]#_g118144_|)
                           (cons (cons 'source |gx[1]#_g118145_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118142 '17 '#f '#f))
        (let ((__tmp118146
               (cons (cons 'mark |gx[1]#_g118147_|)
                     (cons (cons 'e |gx[1]#_g118148_|)
                           (cons (cons 'source |gx[1]#_g118149_|) '())))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 __tmp118146 '18 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '() '19 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '() '21 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118087 '() '20 '#f '#f))
        __obj118087))
    (define |gx[:0:]#syntax-quote|
      (let ((__obj118088
             (let ()
               (declare (not safe))
               (##structure
                gerbil/core/mop~MOP-2#class-type-info::t
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f
                '#f))))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set!
           __obj118088
           'gx#syntax-quote::t
           '1
           '#f
           '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 'syntax '2 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '(context marks) '4 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set!
           __obj118088
           '(e source context marks)
           '6
           '#f
           '#f))
        (let ((__tmp118150 (cons |gx[1]#_g118104_| '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118150 '3 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '#t '7 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '#t '8 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '#f '10 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '#f '11 '#f '#f))
        (let ((__tmp118151 |gx[1]#_g118152_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118151 '12 '#f '#f))
        (let ((__tmp118153 |gx[1]#_g118154_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118153 '13 '#f '#f))
        (let ((__tmp118155 |gx[1]#_g118156_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118155 '14 '#f '#f))
        (let ((__tmp118157
               (cons (cons 'context |gx[1]#_g118158_|)
                     (cons (cons 'marks |gx[1]#_g118159_|)
                           (cons (cons 'e |gx[1]#_g118160_|)
                                 (cons (cons 'source |gx[1]#_g118161_|)
                                       '()))))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118157 '15 '#f '#f))
        (let ((__tmp118162
               (cons (cons 'context |gx[1]#_g118163_|)
                     (cons (cons 'marks |gx[1]#_g118164_|)
                           (cons (cons 'e |gx[1]#_g118165_|)
                                 (cons (cons 'source |gx[1]#_g118166_|)
                                       '()))))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118162 '16 '#f '#f))
        (let ((__tmp118167
               (cons (cons 'context |gx[1]#_g118168_|)
                     (cons (cons 'marks |gx[1]#_g118169_|)
                           (cons (cons 'e |gx[1]#_g118170_|)
                                 (cons (cons 'source |gx[1]#_g118171_|)
                                       '()))))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118167 '17 '#f '#f))
        (let ((__tmp118172
               (cons (cons 'context |gx[1]#_g118173_|)
                     (cons (cons 'marks |gx[1]#_g118174_|)
                           (cons (cons 'e |gx[1]#_g118175_|)
                                 (cons (cons 'source |gx[1]#_g118176_|)
                                       '()))))))
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 __tmp118172 '18 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '() '19 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '() '21 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj118088 '() '20 '#f '#f))
        __obj118088))))
