On 6 Jun 2003 at 20:31, Russell Whitaker wrote:
Hi: Took the Chief's sample, added one line, calling file obj1.pas; then: gpc -o obj obj1.pas
program obj1;
type a = object procedure p; end;
b = object (a) procedure p; virtual; end;
procedure a.p; begin writeln ('a'); end;
procedure b.p; begin writeln ('b'); end;
var foo : a; bar : b;
begin foo.p; bar.p; end.
Got this: obj1.pas:10: internal error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See URL:http://www.gnu-pascal.de/todo.html for instructions.
[...]
I got: "a" "b"
Using: gpc version 20030507, based on gcc-3.2.3 (mingw special 20030504- 1)
Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/