X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/bb6b2dcdd9acffabfd373c4c3f6b64a9cc43f335..419d914ec44e5355d7f9446c98730ee0454acb26:/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