Browse Source

* with EXTDEBUG show non-hidden parameters

git-svn-id: trunk@4735 -
peter 19 years ago
parent
commit
1eeb78379f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/htypechk.pas

+ 1 - 1
compiler/htypechk.pas

@@ -1841,7 +1841,7 @@ implementation
               for i:=0 to hp^.data.paras.count-1 do
                begin
                  currpara:=tparavarsym(hp^.data.paras[i]);
-                 if (vo_is_hidden_para in currpara.varoptions) then
+                 if not(vo_is_hidden_para in currpara.varoptions) then
                    Comment(lvl,'    - '+currpara.vartype.def.typename+' : '+EqualTypeName[currpara.eqval]);
                end;
             end;