Fixed a bug of defined?

This commit is contained in:
Koichi Nakamura 2021-01-14 09:45:42 +09:00
parent 221d341db6
commit 65b87c15c4

View file

@ -2392,7 +2392,7 @@ BLOCK-SIZE remaining-size !
[then] \ End of environment dependent code
: defined? ( "name" -- f )
word throw find <> 0
word throw find 0 <>
;
: need-defined ( "name" -- )