Change a throw to rethrow so that we don't lose the original stack trace

[factor.git] / basis / stack-checker / backend / backend.factor

diff --git a/basis/stack-checker/backend/backend.factor b/basis/stack-checker/backend/backend.factor
index 0596f3d0bd12cfe7324eb176e3fe9dd274f75949..78f357b1cbbf5e2eb145613eed1d97b8527e6116 100755 (executable)
--- a/basis/stack-checker/backend/backend.factor
+++ b/basis/stack-checker/backend/backend.factor
@@ -152,7 +152,7 @@ M: object apply-object push-literal ;
     tri ;
 
 : cannot-infer-effect ( word -- * )
-    "cannot-infer" word-prop throw ;
+    "cannot-infer" word-prop rethrow ;
 
 : maybe-cannot-infer ( word quot -- )
     [ [ "cannot-infer" set-word-prop ] keep throw ] recover ; inline