X-Git-Url: https://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/bb6b2dcdd9acffabfd373c4c3f6b64a9cc43f335..33fb123a0c01869a0634ffaa861aa8b34d06256f:/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