21 Jun
1997
21 Jun
'97
4:50 p.m.
This is the -best- bug that I have ever found! :-) Take a look at the code below...
Program FunnyBug; Type PArray = ^TArray; TArray = Array[0..255] Of Integer; Var I : Integer; A : PArray; Begin New(A); For I := 0 To 255 Do Begin A^[I] := 10; A^[(I)] := 10; { :-) } End; Dispose(A); End.
Hehehe. I LOVE GPC's parser...
Good Luck
________________________ | _) | | e-mail: bernie@icenet.com.au |___)ernhard |_|schirren ptschirrenb@cc.curtin.edu.au www: www.geocities.com/CollegePark/Quad/8070/