rendered paste body: wild-cdiff ( char1 char2 -- delta )
: (wild-compare) ( c-addr1 c-addr2 u -- delta )
: wild-compare ( c-addr1 u1 c-addr2 u2 -- -1 | 0 | 1 )
: wild-prefix-compare ( c-addr1 u1 c-addr2 u2 -- -1 | 0 | 1 )
: wild-search ( c-addr1 u1 c-addr2 u2 -- c-addr3 u3 flag )
: wild-search-skip ( c-addr1 u1 c-addr2 u2 -- c-addr3 u3 flag )
: next-subpattern ( c-addr1 u1 -- c-addr2 u2 c-addr3 u3 )
: find-first-subpattern ( c-addr1 u1 c-addr2 u2 -- c-addr3 u3 )
: (pattern-search) ( c-addr1 u1 c-addr2 u2 -- c-addr3 u3 flag )
: convert-pattern-char ( char1 -- char2 )
: copy-pattern ( c-addr1 u1 c-addr2 -- c-addr2 u2 )
: prepare-pattern ( c-addr1 u1 -- c-addr2 u2 )
: widen ( c-addr1 u1 n -- c-addr2-n u2+n )
: anchor ( c-addr1 u1 -- )
: anchor-pattern ( c-addr1 u1 -- c-addr2 u2 )
: anchor-string ( c-addr1 u1 -- c-addr2 u2 )
: pattern-search ( c-addr1 u1 c-addr2 u2 -- c-addr3 u3 flag )
: pattern-match ( c-addr1 u1 c-addr2 u2 -- flag )