Merged revisions 10395 via svnmerge from

svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r10395 | jonas | 2008-02-27 16:42:49 +0100 (Wed, 27 Feb 2008) | 2 lines

  * also adjust constsetlo when parsing a constant set in Delphi mode

........

git-svn-id: branches/fixes_2_2@10526 -

compiler/ncnv.pas

@@ -487,6 +487,8 @@ implementation
                                   begin
                                     if tordconstnode(p2).value>constsethi then
                                       constsethi:=tordconstnode(p2).value;
+                                    if tordconstnode(p2).value<constsetlo then
+                                      constsetlo:=tordconstnode(p2).value;
                                     if hdef=nil then
                                       hdef:=p2.resultdef;
                                   end