From 28af0a72231bf27b60db7a9384628db54f8ba656 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Fri, 18 Aug 2000 13:18:12 +0000
Subject: [PATCH]  * restore next instead of indexnext field for dc local var
 in GetAbsProcParmDefStr

---
 compiler/browcol.pas | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/compiler/browcol.pas b/compiler/browcol.pas
index 283d1063c9..dc7aed0844 100644
--- a/compiler/browcol.pas
+++ b/compiler/browcol.pas
@@ -1254,10 +1254,10 @@ end;
        end;
        if assigned(dc^.paratype.def) then
          CurName:=CurName+GetDefinitionStr(dc^.paratype.def);
-       if dc^.indexnext<>nil then
+       if dc^.next<>nil then
          CurName:=', '+CurName;
        Name:=CurName+Name;
-       dc:=pparaitem(dc^.indexnext);
+       dc:=pparaitem(dc^.next);
        Inc(Count);
      end;
     GetAbsProcParmDefStr:=Name;
@@ -2094,7 +2094,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.4  2000-08-16 18:33:53  peter
+  Revision 1.5  2000-08-18 13:18:12  pierre
+   * restore next instead of indexnext field for dc local var in GetAbsProcParmDefStr
+
+  Revision 1.4  2000/08/16 18:33:53  peter
     * splitted namedobjectitem.next into indexnext and listnext so it
       can be used in both lists
     * don't allow "word = word" type definitions (merged)
@@ -2105,4 +2108,4 @@ end.
   Revision 1.2  2000/07/13 11:32:32  michael
   + removed logs
 
-}
+}
\ No newline at end of file