X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/77f603e7a5d5b01af482c34c2eae7e563bd17583..c1b0551debcb415cbc9fc976d011998d9f14759b:/fth/member.fth diff --git a/fth/member.fth b/fth/member.fth index c690dbe..160e95f 100644 --- a/fth/member.fth +++ b/fth/member.fth @@ -34,7 +34,7 @@ decimal : FIND.BODY ( -- , pfa true | $name false , look for word in dict. ) \ Return address of parameter data. - 32 word find + bl word find IF >body true ELSE false THEN