prelude: :gerbil/compiler/ssxi
package: std/srfi/159

(begin
  (declare-type
   std/srfi/159/base#Show-Env
   (@struct-type
    std/srfi/159/base#Show-Env
    #f
    14
    #f
    ((fields:
      port
      row
      col
      width
      radix
      precision
      pad-char
      decimal-sep
      decimal-align
      string-width
      ellipsis
      writer
      output
      %props))))
  (declare-type
   std/srfi/159/base#env-port
   (@struct-getf std/srfi/159/base#Show-Env 0 #f))
  (declare-type
   std/srfi/159/base#env-row
   (@struct-getf std/srfi/159/base#Show-Env 1 #f))
  (declare-type
   std/srfi/159/base#env-col
   (@struct-getf std/srfi/159/base#Show-Env 2 #f))
  (declare-type
   std/srfi/159/base#env-width
   (@struct-getf std/srfi/159/base#Show-Env 3 #f))
  (declare-type
   std/srfi/159/base#env-radix
   (@struct-getf std/srfi/159/base#Show-Env 4 #f))
  (declare-type
   std/srfi/159/base#env-precision
   (@struct-getf std/srfi/159/base#Show-Env 5 #f))
  (declare-type
   std/srfi/159/base#env-pad-char
   (@struct-getf std/srfi/159/base#Show-Env 6 #f))
  (declare-type
   std/srfi/159/base#env-decimal-sep
   (@struct-getf std/srfi/159/base#Show-Env 7 #f))
  (declare-type
   std/srfi/159/base#env-decimal-align
   (@struct-getf std/srfi/159/base#Show-Env 8 #f))
  (declare-type
   std/srfi/159/base#env-string-width
   (@struct-getf std/srfi/159/base#Show-Env 9 #f))
  (declare-type
   std/srfi/159/base#env-ellipsis
   (@struct-getf std/srfi/159/base#Show-Env 10 #f))
  (declare-type
   std/srfi/159/base#env-writer
   (@struct-getf std/srfi/159/base#Show-Env 11 #f))
  (declare-type
   std/srfi/159/base#env-output
   (@struct-getf std/srfi/159/base#Show-Env 12 #f))
  (declare-type
   std/srfi/159/base#env-port-set!
   (@struct-setf std/srfi/159/base#Show-Env 0 #f))
  (declare-type
   std/srfi/159/base#env-row-set!
   (@struct-setf std/srfi/159/base#Show-Env 1 #f))
  (declare-type
   std/srfi/159/base#env-col-set!
   (@struct-setf std/srfi/159/base#Show-Env 2 #f))
  (declare-type
   std/srfi/159/base#env-width-set!
   (@struct-setf std/srfi/159/base#Show-Env 3 #f))
  (declare-type
   std/srfi/159/base#env-radix-set!
   (@struct-setf std/srfi/159/base#Show-Env 4 #f))
  (declare-type
   std/srfi/159/base#env-precision-set!
   (@struct-setf std/srfi/159/base#Show-Env 5 #f))
  (declare-type
   std/srfi/159/base#env-pad-char-set!
   (@struct-setf std/srfi/159/base#Show-Env 6 #f))
  (declare-type
   std/srfi/159/base#env-decimal-sep-set!
   (@struct-setf std/srfi/159/base#Show-Env 7 #f))
  (declare-type
   std/srfi/159/base#env-decimal-align-set!
   (@struct-setf std/srfi/159/base#Show-Env 8 #f))
  (declare-type
   std/srfi/159/base#env-string-width-set!
   (@struct-setf std/srfi/159/base#Show-Env 9 #f))
  (declare-type
   std/srfi/159/base#env-ellipsis-set!
   (@struct-setf std/srfi/159/base#Show-Env 10 #f))
  (declare-type
   std/srfi/159/base#env-writer-set!
   (@struct-setf std/srfi/159/base#Show-Env 11 #f))
  (declare-type
   std/srfi/159/base#env-output-set!
   (@struct-setf std/srfi/159/base#Show-Env 12 #f))
  (declare-type std/srfi/159/base#run (@lambda 1 #f))
  (declare-type std/srfi/159/base#return (@lambda 1 #f))
  (declare-type std/srfi/159/base#substring-length (@lambda (1) #f))
  (declare-type std/srfi/159/base#output (@lambda 1 #f))
  (declare-type std/srfi/159/base#show (@lambda (1) #f))
  (declare-type std/srfi/159/base#show-run (@lambda 2 #f))
  (declare-type std/srfi/159/base#nothing (@lambda 1 #f))
  (declare-type std/srfi/159/base#displayed (@lambda 1 #f))
  (declare-type std/srfi/159/base#written (@lambda 1 #f))
  (declare-type std/srfi/159/base#each-in-list (@lambda 1 #f))
  (declare-type std/srfi/159/base#each (@lambda (0) #f))
  (declare-type std/srfi/159/base#output-default (@lambda 1 #f))
  (declare-type std/srfi/159/base#call-with-output (@lambda 2 #f))
  (declare-type std/srfi/159/base#write-to-string (@lambda 1 #f))
  (declare-type std/srfi/159/base#string-replace-all (@lambda 3 #f))
  (declare-type std/srfi/159/base#string-intersperse-right (@lambda 3 #f))
  (declare-type std/srfi/159/base#escaped (@lambda (1) #f))
  (declare-type std/srfi/159/base#maybe-escaped (@lambda (2) #f))
  (declare-type std/srfi/159/base#char-mirror (@lambda 1 #f))
  (declare-type std/srfi/159/base#integer-log (@lambda 2 #f))
  (declare-type std/srfi/159/base#numeric (@lambda (1) #f))
  (declare-type std/srfi/159/base#numeric/si (@lambda (1) #f))
  (declare-type std/srfi/159/base#numeric/fitted (@lambda (2) #f))
  (declare-type std/srfi/159/base#numeric/comma (@lambda (1) #f))
  (declare-type std/srfi/159/base#extract-shared-objects (@lambda 2 #f))
  (declare-type std/srfi/159/base#maybe-gen-shared-ref (@lambda 2 #f))
  (declare-type std/srfi/159/base#call-with-shared-ref (@lambda 3 #f))
  (declare-type std/srfi/159/base#call-with-shared-ref/cdr (@lambda (3) #f))
  (declare-type std/srfi/159/base#write-with-shares (@lambda 2 #f))
  (declare-type std/srfi/159/base#written-default (@lambda 1 #f))
  (declare-type std/srfi/159/base#written-shared (@lambda 1 #f))
  (declare-type std/srfi/159/base#written-simply (@lambda 1 #f)))
