prelude: :gerbil/compiler/ssxi
package: std

(begin
  (declare-type std/logger#start-logger!__% (@lambda 1 #f))
  (declare-type std/logger#start-logger!__0 (@lambda 0 #f))
  (declare-type
   std/logger#start-logger!
   (@case-lambda
    (0 std/logger#start-logger!__0)
    (1 std/logger#start-logger!__%)))
  (declare-type
   std/logger#!log-message::t
   (@struct-type std/logger#!log-message::t #f 3 #f ()))
  (declare-type
   std/logger#!log-message?
   (@struct-pred std/logger#!log-message::t))
  (declare-type
   std/logger#make-!log-message
   (@struct-cons std/logger#!log-message::t))
  (declare-type
   std/logger#!log-message-source
   (@struct-getf std/logger#!log-message::t 0 #f))
  (declare-type
   std/logger#!log-message-level
   (@struct-getf std/logger#!log-message::t 1 #f))
  (declare-type
   std/logger#!log-message-e
   (@struct-getf std/logger#!log-message::t 2 #f))
  (declare-type
   std/logger#!log-message-source-set!
   (@struct-setf std/logger#!log-message::t 0 #f))
  (declare-type
   std/logger#!log-message-level-set!
   (@struct-setf std/logger#!log-message::t 1 #f))
  (declare-type
   std/logger#!log-message-e-set!
   (@struct-setf std/logger#!log-message::t 2 #f))
  (declare-type std/logger#logger-server (@lambda 2 #f))
  (declare-type std/logger#debug (@lambda (1) #f))
  (declare-type std/logger#warning (@lambda (1) #f))
  (declare-type std/logger#log-error (@lambda 2 #f))
  (declare-type std/logger#log-message (@lambda 2 #f)))
