The following program displays 'Linux' as if I did a writeln('Linux') when it is run. I am running an older ver of Slackware & GPC beta. Any ideas?

Ken L.

%<----------------------------------------------- program uname;

const BuffSize = 2048;

var read_fp : file; buffer : array[1..BuffSize+1] of char; chars_read : integer;

procedure memset(cPtr : PChar; SetVal : char; size : integer); C;

begin

(* memset(buffer, char($00), BuffSize);*)

(* This strange program looks like it is doing a writeln('Linux') when run! *)

end.