* fixed compilation of 64-bit cross-compilers on 32 bit platforms

    (mantis #31487)

git-svn-id: trunk@35532 -

compiler/ncon.pas

@@ -1149,7 +1149,7 @@ implementation
 
     function tsetconstnode.elements : AInt;
       var
-        i : AInt;
+        i : longint;
       begin
         result:=0;
         if not(assigned(value_set)) then