(declare (block) (standard-bindings) (extended-bindings))
(begin
  (define std/misc/timeout#make-timeout__%
    (lambda (_t389_ _none390_)
      (if (not _t389_)
          _none390_
          (if (time? _t389_)
              _t389_
              (if (real? _t389_)
                  (seconds->time
                   (+ (let () (declare (not safe)) (##current-time-point))
                      _t389_))
                  (error '"Bad argument; expected real, time or #f"
                         _t389_))))))
  (define std/misc/timeout#make-timeout__0
    (lambda (_t395_)
      (let ((_none397_ absent-obj))
        (std/misc/timeout#make-timeout__% _t395_ _none397_))))
  (define std/misc/timeout#make-timeout
    (lambda _g4001_
      (let ((_g4000_ (let () (declare (not safe)) (##length _g4001_))))
        (cond ((let () (declare (not safe)) (##fx= _g4000_ 1))
               (apply std/misc/timeout#make-timeout__0 _g4001_))
              ((let () (declare (not safe)) (##fx= _g4000_ 2))
               (apply std/misc/timeout#make-timeout__% _g4001_))
              (else
               (##raise-wrong-number-of-arguments-exception
                std/misc/timeout#make-timeout
                _g4001_)))))))
