* write a name for the none property access entry (looks nicer than a "(Nil)" at the start of the line)

git-svn-id: trunk@42354 -

compiler/utils/ppuutils/ppudump.pp

@@ -3622,6 +3622,7 @@ begin
              write  ([space,'   Index Type : ']);
              readderef('');
              { palt_none }
+             write  ([space,'   Noneaccess : ']);
              readpropaccesslist('');
              write  ([space,'   Readaccess : ']);
              readpropaccesslist(space+'         Sym: ',TPpuPropDef(def).Getter);