(declare (block) (standard-bindings) (extended-bindings) (inlining-limit 200))
(begin
  (define |std/parser/stream[1]#_g4507_|
    (##structure
     gx#syntax-quote::t
     'char-stream::t
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4508_|
    (##structure
     gx#syntax-quote::t
     'make-char-stream
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4509_|
    (##structure
     gx#syntax-quote::t
     'char-stream?
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4510_|
    (##structure
     gx#syntax-quote::t
     'char-stream-port
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4511_|
    (##structure
     gx#syntax-quote::t
     'char-stream-buf
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4512_|
    (##structure
     gx#syntax-quote::t
     'char-stream-loc
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4513_|
    (##structure
     gx#syntax-quote::t
     'char-stream-lines
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4514_|
    (##structure
     gx#syntax-quote::t
     'char-stream-port-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4515_|
    (##structure
     gx#syntax-quote::t
     'char-stream-buf-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4516_|
    (##structure
     gx#syntax-quote::t
     'char-stream-loc-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[1]#_g4517_|
    (##structure
     gx#syntax-quote::t
     'char-stream-lines-set!
     #f
     (gx#current-expander-context)
     '()))
  (define |std/parser/stream[:0:]#char-stream|
    (|gerbil/core$<MOP>$<MOP:2>[1]#make-extended-struct-info|
     'runtime-identifier:
     |std/parser/stream[1]#_g4507_|
     'expander-identifiers:
     (cons '#f
           (cons |std/parser/stream[1]#_g4507_|
                 (cons |std/parser/stream[1]#_g4508_|
                       (cons |std/parser/stream[1]#_g4509_|
                             (cons (cons |std/parser/stream[1]#_g4510_|
                                         (cons |std/parser/stream[1]#_g4511_|
                                               (cons |std/parser/stream[1]#_g4512_|
                                                     (cons |std/parser/stream[1]#_g4513_|
                                                           '()))))
                                   (cons (cons |std/parser/stream[1]#_g4514_|
                                               (cons |std/parser/stream[1]#_g4515_|
                                                     (cons |std/parser/stream[1]#_g4516_|
                                                           (cons |std/parser/stream[1]#_g4517_|
;;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
                         '()))))
;;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
                                         '()))))))
     'type-exhibitor:
     (|gerbil/core$<MOP>$<MOP:2>[1]#make-runtime-struct-exhibitor|
      '#f
      '#f
      'char-stream
      ':init!
      '((final: . #t))
      '(port buf loc lines)))))
