فهرست منبع

* use do_halt instead of halt

pierre 26 سال پیش
والد
کامیت
a5c2aa5df8
1فایلهای تغییر یافته به همراه5 افزوده شده و 2 حذف شده
  1. 5 2
      compiler/compiler.pas

+ 5 - 2
compiler/compiler.pas

@@ -144,7 +144,7 @@ begin
   if recoverpospointer<>nil then
     LongJmp(recoverpospointer^,1)
   else
-    Halt(1);
+    Do_Halt(1);
 end;
 {$endif USEEXCEPT}
 
@@ -299,7 +299,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.32  1999-09-02 18:47:44  daniel
+  Revision 1.33  1999-09-07 15:10:04  pierre
+   * use do_halt instead of halt
+
+  Revision 1.32  1999/09/02 18:47:44  daniel
     * Could not compile with TP, some arrays moved to heap
     * NOAG386BIN default for TP
     * AG386* files were not compatible with TP, fixed.