소스 검색

* boolean internal definition again (needed to compile
older RTL's)

pierre 27 년 전
부모
커밋
c04eb73621
1개의 변경된 파일7개의 추가작업 그리고 1개의 파일을 삭제
  1. 7 1
      rtl/inc/systemh.inc

+ 7 - 1
rtl/inc/systemh.inc

@@ -33,7 +33,9 @@ Type
   byte     = 0..255;
   Word     = 0..65535;
 
+  { 
   Boolean = ByteBool;
+  removed because too incompatible with older versions PM }
 
 { at least declare Turbo Pascal real types }
 {$IFDEF i386}
@@ -333,7 +335,11 @@ Procedure AddExitProc(Proc:TProcedure);
 
 {
   $Log$
-  Revision 1.8  1998-06-03 23:39:53  peter
+  Revision 1.9  1998-06-04 08:26:03  pierre
+    * boolean internal definition again (needed to compile
+      older RTL's)
+
+  Revision 1.8  1998/06/03 23:39:53  peter
     + boolean=bytebool
 
   Revision 1.7  1998/05/22 12:34:11  peter