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/