(declare (block) (standard-bindings) (extended-bindings) (inlining-limit 200))
(begin
  (define |gerbil/core/more-sugar[2]#_g41522_|
    (##structure
     gx#syntax-quote::t
     'macro-object
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41524_|
    (##structure
     gx#syntax-quote::t
     'setq-macro::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41526_|
    (##structure
     gx#syntax-quote::t
     'make-setq-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41528_|
    (##structure
     gx#syntax-quote::t
     'setq-macro?
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41530_|
    (##structure
     gx#syntax-quote::t
     'setq-macro-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41532_|
    (##structure
     gx#syntax-quote::t
     'setq-macro-macro-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41534_|
    (##structure
     gx#syntax-quote::t
     '&setq-macro-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41536_|
    (##structure
     gx#syntax-quote::t
     '&setq-macro-macro-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41539_|
    (##structure
     gx#syntax-quote::t
     'setf-macro::t
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41541_|
    (##structure
     gx#syntax-quote::t
     'make-setf-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41543_|
    (##structure
     gx#syntax-quote::t
     'setf-macro?
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41545_|
    (##structure
     gx#syntax-quote::t
     'setf-macro-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41547_|
    (##structure
     gx#syntax-quote::t
     'setf-macro-macro-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41549_|
    (##structure
     gx#syntax-quote::t
     '&setf-macro-macro
     #f
     (gx#current-expander-context)
     '()))
  (define |gerbil/core/more-sugar[2]#_g41551_|
    (##structure
     gx#syntax-quote::t
     '&setf-macro-macro-set!
     #f
     (gx#current-expander-context)
     '()))
  (begin
    (define |gerbil/core/more-sugar[:1:]#setq-macro|
      (let ((__obj41506
             (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!
           __obj41506
           'gerbil/core/more-sugar#setq-macro::t
           '1
           '#f
           '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 'setq-macro '2 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 '() '4 '#f '#f))
        (let ((__tmp41521 (cons |gerbil/core/more-sugar[2]#_g41522_| '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41521 '3 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 '#f '7 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 '#f '8 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 '#f '10 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 '#f '11 '#f '#f))
        (let ((__tmp41523 |gerbil/core/more-sugar[2]#_g41524_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41523 '12 '#f '#f))
        (let ((__tmp41525 |gerbil/core/more-sugar[2]#_g41526_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41525 '13 '#f '#f))
        (let ((__tmp41527 |gerbil/core/more-sugar[2]#_g41528_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41527 '14 '#f '#f))
        (let ((__tmp41529
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41530_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41529 '15 '#f '#f))
        (let ((__tmp41531
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41532_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41531 '16 '#f '#f))
        (let ((__tmp41533
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41534_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41533 '17 '#f '#f))
        (let ((__tmp41535
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41536_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41506 __tmp41535 '18 '#f '#f))
        __obj41506))
    (define |gerbil/core/more-sugar[:1:]#setf-macro|
      (let ((__obj41507
             (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!
           __obj41507
           'gerbil/core/more-sugar#setf-macro::t
           '1
           '#f
           '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 'setf-macro '2 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 '() '4 '#f '#f))
        (let ((__tmp41537 (cons |gerbil/core/more-sugar[2]#_g41522_| '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41537 '3 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 '#f '7 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 '#f '8 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 '#f '10 '#f '#f))
        (let ()
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 '#f '11 '#f '#f))
        (let ((__tmp41538 |gerbil/core/more-sugar[2]#_g41539_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41538 '12 '#f '#f))
        (let ((__tmp41540 |gerbil/core/more-sugar[2]#_g41541_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41540 '13 '#f '#f))
        (let ((__tmp41542 |gerbil/core/more-sugar[2]#_g41543_|))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41542 '14 '#f '#f))
        (let ((__tmp41544
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41545_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41544 '15 '#f '#f))
        (let ((__tmp41546
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41547_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41546 '16 '#f '#f))
        (let ((__tmp41548
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41549_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41548 '17 '#f '#f))
        (let ((__tmp41550
               (cons (cons 'macro |gerbil/core/more-sugar[2]#_g41551_|) '())))
          (declare (not safe))
          (##unchecked-structure-set! __obj41507 __tmp41550 '18 '#f '#f))
        __obj41507))))
