Remove two warnings about missing case (others are still present in ppudump.pp source)

git-svn-id: trunk@42085 -

compiler/utils/ppuutils/ppudump.pp

@@ -1176,6 +1176,7 @@ begin
      break;
     write([s,'(',slstr[sl],') ']);
     case sl of
+      sl_none : ;
       sl_call,
       sl_load,
       sl_subscript :

compiler/utils/ppuutils/ppuout.pp

@@ -473,7 +473,7 @@ const
     ('dynamic');
 
   ConstTypeNames: array[TPpuConstType] of string =
-    ('', 'int', 'float', 'string', 'set', 'pointer');
+    ('unknown', 'int', 'float', 'string', 'set', 'pointer');
 
   OrdTypeNames: array[TPpuOrdType] of string =
     ('void', 'uint', 'sint', 'pasbool', 'bool', 'char', 'currency');
@@ -695,6 +695,7 @@ begin
     WriteStr('ValType', ConstTypeNames[ConstType]);
     s:='Value';
     case ConstType of
+      ctUnknown: ;
       ctInt:
         WriteInt(s, VInt);
       ctFloat: