Where does the block of the for statement end, please? I looked at the original article, page 266 for those interested, but I'm still not clear on it.

honey the codewitch wrote:

for i := 1 step 1 until m do. if A[i] = x then go to found fi; not found: i := re+l; m := i; A[i] := x; B[i] := 0; found: B[i] := B[i]+I;