From b7dcdb0966893f078d26d3a158859a7a1ff7ecba Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Wed, 14 Oct 1998 13:33:24 +0000
Subject: [PATCH]   * fixed small typo

---
 compiler/htypechk.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/compiler/htypechk.pas b/compiler/htypechk.pas
index 67440b1549..71c6b4e921 100644
--- a/compiler/htypechk.pas
+++ b/compiler/htypechk.pas
@@ -156,7 +156,7 @@ implementation
                      ((doconv=tc_int_2_bool) and
                       (not explicit) and
                       (not is_boolean(def_from))) then
-                   b:=true;
+                   b:=false;
                 end;
              end;
 
@@ -675,7 +675,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.6  1998-10-14 12:53:38  peter
+  Revision 1.7  1998-10-14 13:33:24  peter
+    * fixed small typo
+
+  Revision 1.6  1998/10/14 12:53:38  peter
     * fixed small tp7 things
     * boolean:=longbool and longbool fixed