#1878 SEEK does not affect WRITE position

[AvdP]

Using installer ooRexx-5.1.0-12653.windows.x86_32.exe

This code:

filename = 'f1.txt'
rc = lineout(filename, 'xxxxxxxxxxxxxxxxxxxxxx')
rc = lineout(filename, 'xxxxxxxxxxxxxxxxxxxxxx')
rc = lineout(filename, 'xxxxxxxxxxxxxxxxxxxxxx')
rc = lineout(filename, 'xxxxxxxxxxxxxxxxxxxxxx')
rc = lineout(filename, 'xxxxxxxxxxxxxxxxxxxxxx')
rc = lineout(filename)

str = .stream~new(filename)
str~open
str~seek('< 2 write line')
str~charout('.....')
str~close

gives me:

xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
.....

I had expected:

xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
.....xxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxx

Note that if I change to
str~seek('< 2 line')
I do get the 2nd output.

[Erich]

code fix submitted with revision [r12717]