* Merging revisions r46321 from trunk:

    ------------------------------------------------------------------------
    r46321 | michael | 2020-08-08 11:19:19 +0200 (Sat, 08 Aug 2020) | 1 line
    
    * Fix bug ID #37512: fix declaration of generic array
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@46618 -

packages/fcl-passrc/src/pastree.pp

@@ -4191,7 +4191,7 @@ begin
   if Full then
     begin
     if GenericTemplateTypes<>nil then
-      Result:=Result+GenericTemplateTypesAsString(GenericTemplateTypes)+' = '+Result
+      Result:=SafeName+GenericTemplateTypesAsString(GenericTemplateTypes)+' = '+Result
     else
       Result:=SafeName+' = '+Result;
     end;