initializeMatch: length
m
pattern
size
n
length
ifTrue:
dM
1
n
<
hp
ht
0
^false
m
d
256
q
4177969
dTimesQ
d
*
2
to:
do:
q
fifo
Array
new:
i
m
j
1
m
dM
rem:
q
dM
*
d