Anonymous user
Words containing "the" substring: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 672:
create SearchSub 80 allot
Create SrcFile 256 allot
Variable fhin
variable Cnt
s" ./unixdict.txt" SrcFile place▼
s" the" SearchSub place▼
: SrcOpen Srcfile count r/o open-file throw Fhin ! ;
Line 695 ⟶ 692:
: Test 0 cnt !
▲ s" ./unixdict.txt" SrcFile place
▲ s" the" SearchSub place
SrcOpen
read-lines
| |||