From adc5f048eba54a051f237c1e7be5898ff379efe5 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sat, 5 Mar 2005 16:09:20 +0000
Subject: [PATCH]   * fixed small bug in ttypeconvnode.printnodeinfo

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

diff --git a/compiler/ncnv.pas b/compiler/ncnv.pas
index 0d7f2fdb68..253a7e8d4b 100644
--- a/compiler/ncnv.pas
+++ b/compiler/ncnv.pas
@@ -635,7 +635,7 @@ implementation
         );
       begin
         inherited printnodeinfo(t);
-        write(', convtype = ',strpas(convtyp2str[convtype]));
+        write(t,', convtype = ',strpas(convtyp2str[convtype]));
       end;
 
 
@@ -2595,7 +2595,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.177  2005-02-14 17:13:06  peter
+  Revision 1.178  2005-03-05 16:09:20  jonas
+    * fixed small bug in ttypeconvnode.printnodeinfo
+
+  Revision 1.177  2005/02/14 17:13:06  peter
     * truncate log
 
   Revision 1.176  2005/02/03 18:43:59  florian