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