* store lower set bound in a setdef

compiler/ppu.pas

@@ -48,7 +48,7 @@ const
   CurrentPPUVersion = 208;
   { for any other changes to the ppu format, increase this version number
     (it's a cardinal) }
-  CurrentPPULongVersion = 28;
+  CurrentPPULongVersion = 29;
 
 { unit flags }
   uf_big_endian          = $000004;

compiler/symdef.pas

@@ -1090,7 +1090,7 @@ interface
           elementdef : tdef;
           elementdefderef : tderef;
           setbase,
-          setmax   : asizeint;
+          setlow,setmax   : asizeint;
           constructor create(def: tdef; low, high: asizeint; doregister: boolean);virtual;
           constructor ppuload(ppufile:tcompilerppufile);
           function getcopy : tstoreddef;override;
@@ -4228,6 +4228,7 @@ implementation
          elementdef:=def;
          elementdefderef.reset;
          setmax:=high;
+         setlow:=low;
          actual_setalloc:=current_settings.setalloc;
 {$if defined(cpu8bitalu) or defined(cpu16bitalu)}
          if actual_setalloc=0 then
@@ -4263,6 +4264,7 @@ implementation
          ppufile.getderef(elementdefderef);
          savesize:=ppufile.getasizeint;
          setbase:=ppufile.getasizeint;
+         setlow:=ppufile.getasizeint;
          setmax:=ppufile.getasizeint;
          ppuload_platform(ppufile);
       end;
@@ -4282,6 +4284,7 @@ implementation
          ppufile.putderef(elementdefderef);
          ppufile.putasizeint(savesize);
          ppufile.putasizeint(setbase);
+         ppufile.putasizeint(setlow);
          ppufile.putasizeint(setmax);
          writeentry(ppufile,ibsetdef);
       end;