* use min and max in defutil.get_common_intdef

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/i8086@24120 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 3 insertions, 7 deletions

diff --git a/compiler/defutil.pas b/compiler/defutil.pas
index 14b82bddcf..359d81d697 100644
--- a/compiler/defutil.pas
+++ b/compiler/defutil.pas
@@ -309,7 +309,7 @@ interface
 implementation
 
     uses
-       verbose;
+       verbose,cutils;
 
     { returns true, if def uses FPU }
     function is_fpu(def : tdef) : boolean;
@@ -1220,12 +1220,8 @@ implementation
       var
         llow, lhigh: tconstexprint;
       begin
-        llow:=rd.low;
-        if llow>ld.low then
-          llow:=ld.low;
-        lhigh:=rd.high;
-        if lhigh<ld.high then
-          lhigh:=ld.high;
+        llow:=min(ld.low,rd.low);
+        lhigh:=max(ld.high,rd.high);
         case range_to_basetype(llow,lhigh) of
           s8bit:
             result:=torddef(s8inttype);