From 6f2206fbeb213226fc27222d43cbf906f5122112 Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Wed, 3 Jun 1998 23:39:53 +0000
Subject: [PATCH]   + boolean=bytebool

---
 rtl/inc/systemh.inc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/rtl/inc/systemh.inc b/rtl/inc/systemh.inc
index b21c930aca..830d316461 100644
--- a/rtl/inc/systemh.inc
+++ b/rtl/inc/systemh.inc
@@ -33,6 +33,7 @@ Type
   byte     = 0..255;
   Word     = 0..65535;
 
+  Boolean = ByteBool;
 
 { at least declare Turbo Pascal real types }
 {$IFDEF i386}
@@ -332,7 +333,10 @@ Procedure AddExitProc(Proc:TProcedure);
 
 {
   $Log$
-  Revision 1.7  1998-05-22 12:34:11  peter
+  Revision 1.8  1998-06-03 23:39:53  peter
+    + boolean=bytebool
+
+  Revision 1.7  1998/05/22 12:34:11  peter
     * fixed the optimizes of daniel
 
   Revision 1.6  1998/05/21 19:31:00  peter