From 92203909b9200e642fb25412ae1d86ea3f6ec20b Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Thu, 4 Mar 2004 17:22:32 +0000
Subject: [PATCH]   * use defs_equal when comparing pointer types

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

diff --git a/compiler/defcmp.pas b/compiler/defcmp.pas
index 7c47f4c5b2..4d3280778a 100644
--- a/compiler/defcmp.pas
+++ b/compiler/defcmp.pas
@@ -724,7 +724,7 @@ implementation
                        end
                      else
                       { same types }
-                      if (tpointerdef(def_from).pointertype.def=tpointerdef(def_to).pointertype.def) then
+                      if equal_defs(tpointerdef(def_from).pointertype.def,tpointerdef(def_to).pointertype.def) then
                        begin
                          eq:=te_equal
                        end
@@ -1274,7 +1274,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.48  2004-03-03 22:02:16  peter
+  Revision 1.49  2004-03-04 17:22:32  peter
+    * use defs_equal when comparing pointer types
+
+  Revision 1.48  2004/03/03 22:02:16  peter
     * also compare calling convention in proc_to_procvar_equal
 
   Revision 1.47  2004/02/24 16:12:39  peter