(use-modules (knots) (fibers) (knots promise))

(run-fibers
 (lambda ()
   ;; FIRST BACKTRACE ENTRY: (with-exception-handler
   (with-exception-handler
       (lambda (e)
         (print-backtrace-and-exception/knots e)
         (primitive-exit 1))
     (lambda ()
       (fibers-force
        (fibers-delay
         (lambda ()
           (error "error from fibers-force"))))))) ; LAST BACKTRACE ENTRY HERE
 #:hz 0 #:parallelism 1)
