|
@@ -133,7 +133,7 @@ var
|
|
{*****************************************************************************
|
|
{*****************************************************************************
|
|
System Dependent Exit code
|
|
System Dependent Exit code
|
|
*****************************************************************************}
|
|
*****************************************************************************}
|
|
-procedure haltproc(e:longint); cdecl; external name '_haltproc';
|
|
|
|
|
|
+procedure haltproc(e:longint); cdecl; external name 'haltproc';
|
|
|
|
|
|
Procedure system_exit;
|
|
Procedure system_exit;
|
|
begin
|
|
begin
|