소스 검색

* rtl/atari: use the haltproc declared in the startup code instead of calling pterm in the system unit directly.

Karoly Balogh 3 년 전
부모
커밋
93494bf8bf
1개의 변경된 파일3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      rtl/atari/system.pp

+ 3 - 1
rtl/atari/system.pp

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