]> gitweb.factorcode.org Git - factor.git/commitdiff
words: Rename undefined.
authorDoug Coleman <doug.coleman@gmail.com>
Sun, 24 Mar 2013 04:29:15 +0000 (21:29 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Sun, 24 Mar 2013 04:29:15 +0000 (21:29 -0700)
core/words/words-tests.factor
core/words/words.factor

index 60673c6c7e716b8d9b7524d9dc6d13973a4cf5fc..605f8b8c4dfba5d245071cff433e19ee26a8cdbb 100644 (file)
@@ -66,10 +66,10 @@ FORGET: another-forgotten
 
 ! Make sure that undefined words throw proper errors
 DEFER: deferred
-[ deferred ] [ T{ undefined f deferred } = ] must-fail-with
+[ deferred ] [ T{ undefined-word f deferred } = ] must-fail-with
 
 [ "IN: words.tests DEFER: not-compiled << not-compiled >>" eval( -- ) ]
-[ error>> [ undefined? ] [ word>> name>> "not-compiled" = ] bi and ] must-fail-with
+[ error>> [ undefined-word? ] [ word>> name>> "not-compiled" = ] bi and ] must-fail-with
 
 [ ] [ "IN: words.tests FORGET: not-compiled" eval( -- ) ] unit-test
 
@@ -87,7 +87,7 @@ DEFER: deferred
 ] when*
 
 [ "IN: words.tests : undef-test ( -- ) ; << undef-test >>" eval( -- ) ]
-[ error>> undefined? ] must-fail-with
+[ error>> undefined-word? ] must-fail-with
 
 [ ] [
     "IN: words.tests GENERIC: symbol-generic ( -- )" eval( -- )
index ac0b729f06f02d107a6f26d2118e1941b30a43b3..11cf910be307b63115d0aa403ded038861c3a537 100644 (file)
@@ -53,8 +53,8 @@ M: word definition def>> ;
 
 PRIVATE>
 
-TUPLE: undefined word ;
-: undefined ( -- * ) callstack caller \ undefined boa throw ;
+TUPLE: undefined-word word ;
+: undefined ( -- * ) callstack caller \ undefined-word boa throw ;
 
 : undefined-def ( -- quot )
     #! 'f' inhibits tail call optimization in non-optimizing