change ERROR: words from throw-foo back to foo.

[factor.git] / extra / math / matrices / laplace / laplace.factor

diff --git a/extra/math/matrices/laplace/laplace.factor b/extra/math/matrices/laplace/laplace.factor
index 86b12231e1c126b7d9a9f0cd54d243b337529017..817fa89d9a9845bc1a2f5949f13aee3691d8c740 100644 (file)
--- a/extra/math/matrices/laplace/laplace.factor
+++ b/extra/math/matrices/laplace/laplace.factor
@@ -32,7 +32,7 @@ INSTANCE: missing immutable-sequence
 ERROR: not-a-square-matrix matrix ;
 
 : check-square-matrix ( matrix -- matrix )
-    dup square-matrix? [ throw-not-a-square-matrix ] unless ; inline
+    dup square-matrix? [ not-a-square-matrix ] unless ; inline
 
 PRIVATE>