mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-27 10:52:50 +02:00
* compilation fix
This commit is contained in:
parent
de424adb0d
commit
526f7b716a
@ -154,10 +154,10 @@ implementation
|
|||||||
|
|
||||||
****************************************************************************}
|
****************************************************************************}
|
||||||
|
|
||||||
|
|
||||||
procedure system_exit;
|
procedure system_exit;
|
||||||
begin
|
begin
|
||||||
DosFreeThreadLocalMemory (DataIndex);
|
DosExit (1{process}, exitcode);
|
||||||
DosExit(1{process}, exitcode);
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{$ASMMODE ATT}
|
{$ASMMODE ATT}
|
||||||
@ -769,7 +769,10 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.79 2005-02-14 17:13:31 peter
|
Revision 1.80 2005-03-01 21:59:14 hajny
|
||||||
|
* compilation fix
|
||||||
|
|
||||||
|
Revision 1.79 2005/02/14 17:13:31 peter
|
||||||
* truncate log
|
* truncate log
|
||||||
|
|
||||||
Revision 1.78 2005/02/06 16:57:18 peter
|
Revision 1.78 2005/02/06 16:57:18 peter
|
||||||
|
Loading…
Reference in New Issue
Block a user