paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-02 15:24:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

rtl: fix typos

Browse Source 
git-svn-id: trunk@14935 -
This commit is contained in:
paul 2010-02-25 04:09:30 +00:00
parent c235307643
commit bfb7d91b74
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/except.inc
View File

@ -184,7 +184,7 @@ begin
end;
Function fpc_Raiseexception (Obj : TObject; AnAddr,AFrame : Pointer) : TObject;[Public, Alias : 'FPC_RAISEEXCEPTION']; compilerproc;
Function fpc_RaiseException (Obj : TObject; AnAddr,AFrame : Pointer) : TObject;[Public, Alias : 'FPC_RAISEEXCEPTION']; compilerproc;
var
_ExceptObjectStack : PExceptObject;
_ExceptAddrstack : PExceptAddr;
@ -339,7 +339,7 @@ end;
Procedure fpc_DestroyException(o : TObject);[Public, Alias : 'FPC_DESTROYEXCEPTION']; compilerproc;
begin
{ with free we're on the really save side }
{ with free we're on the really safe side }
o.Free;
end;