(declare (block) (standard-bindings) (extended-bindings))
(begin
  (define std/interactive#enter-module!
    (lambda (_mod768_)
      (call-with-parameters
       (lambda () (let () (declare (not safe)) (##repl)))
       gx#current-expander-context
       (gx#import-module _mod768_ '#f '#t))))
  (define std/interactive#macro-expand__%
    (lambda (_expr753_ _expand-e754_)
      (let ((_expr*756_ (_expand-e754_ _expr753_)))
        (pretty-print (gx#syntax->datum _expr*756_))
        _expr*756_)))
  (define std/interactive#macro-expand__0
    (lambda (_expr761_)
      (let ((_expand-e763_ gx#core-expand*))
        (std/interactive#macro-expand__% _expr761_ _expand-e763_))))
  (define std/interactive#macro-expand
    (lambda _g4369_
      (let ((_g4368_ (let () (declare (not safe)) (##length _g4369_))))
        (cond ((let () (declare (not safe)) (##fx= _g4368_ 1))
               (apply std/interactive#macro-expand__0 _g4369_))
              ((let () (declare (not safe)) (##fx= _g4368_ 2))
               (apply std/interactive#macro-expand__% _g4369_))
              (else
               (##raise-wrong-number-of-arguments-exception
                std/interactive#macro-expand
                _g4369_))))))
  (define std/interactive#macro-expand1
    (lambda (_expr750_)
      (std/interactive#macro-expand__% _expr750_ gx#core-expand1))))
