]> gitweb.factorcode.org Git - factor.git/commitdiff
Change a throw to rethrow so that we don't lose the original stack trace
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Thu, 5 Mar 2009 03:38:05 +0000 (21:38 -0600)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Thu, 5 Mar 2009 03:38:05 +0000 (21:38 -0600)
basis/stack-checker/backend/backend.factor

index 0596f3d0bd12cfe7324eb176e3fe9dd274f75949..78f357b1cbbf5e2eb145613eed1d97b8527e6116 100755 (executable)
@@ -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