Use start-stack in fibers-force

Otherwise the backtraces are more confusing.
2025-12-06 10:02:58 +00:00 · 2025-12-06 10:02:58 +00:00 · f64e435b57
commit f64e435b57
parent a8e07b738b
1 changed files with 4 additions and 1 deletions
--- a/knots/promise.scm
+++ b/knots/promise.scm
@ -82,7 +82,10 @@
                         (make-exception
                          exn
                          (make-knots-exception stack)))))
-                  (fibers-promise-thunk fp)))
+                  (lambda ()
+                    (start-stack
+                     #t
+                     ((fibers-promise-thunk fp))))))
              #:unwind? #t))
        (lambda vals
          (atomic-box-set! (fibers-promise-values-box fp)