From d6f431a5a98f53cd8a8cfda475989daf5de6a92d Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Sun, 8 Jun 2003 11:41:21 +0000
Subject: [PATCH]   * set parast.next to the owner of the procdef

---
 compiler/symdef.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/symdef.pas b/compiler/symdef.pas
index d0340d7c8c..3dd39a1d75 100644
--- a/compiler/symdef.pas
+++ b/compiler/symdef.pas
@@ -3060,6 +3060,7 @@ implementation
          inherited create;
          parast:=tparasymtable.create(level);
          parast.defowner:=self;
+         parast.next:=owner;
          para:=TLinkedList.Create;
          minparacount:=0;
          maxparacount:=0;
@@ -5766,7 +5767,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.150  2003-06-07 20:26:32  peter
+  Revision 1.151  2003-06-08 11:41:21  peter
+    * set parast.next to the owner of the procdef
+
+  Revision 1.150  2003/06/07 20:26:32  peter
     * re-resolving added instead of reloading from ppu
     * tderef object added to store deref info for resolving