On Fri, 24 Dec 2004 10:56:24 +0100 (W. Europe Standard Time)
Michael Van Canneyt <[EMAIL PROTECTED]> wrote:

> > If the answer is yes, then maybe it's safe to compile parts of FPC
> > sources in lists.inc (like TList.Get) inside {$IMPLICITEXCEPTIONS OFF} ?

Why not put it into a sub proc:

function TList.Get(Index: Integer): Pointer;

  procedure RaiseIndexError;
  begin
    Error(SListIndexError,Index);
  end;

begin
  If (Index<0) or (Index>=FCount) then
    RaiseIndexError;
  Result:=FList^[Index];
end;

?


Mattias

_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to