Hi
this program:
program writebug;
var
b1, b2: string (80);
f: Text;
begin
Assign (f, 'ref.txt');
Reset (f);
readln (f, b2);
while not eof(f) do
begin
ReadLn (f, b1);
if b1 [ 1 ] = '=' then
writeln( b2, ' ':64 - length( b2 ), 'bug')
else
WriteLn ( b2);
b2 := b1;
end;
writeln ( b1);
Close (f);
end.
Using either gpc built with gcc-3.3.3 or gcc-3.4.0
and this input file named ref.txt:
The Alphabetical GPC Language Reference
Abs
===
absolute
========
oops.
gives me this output:
The Alphabetical GPC Language Reference
Abs bug
=== bug
absolute bug
======== bug
oops.
Unless I have egg on my face (again), the word "bug" should not appear on
the "===" lines.
Russ