* fixed class cast errors in range checking code

git-svn-id: trunk@12720 -

compiler/arm/narmcon.pas

@@ -80,7 +80,7 @@ interface
                   { range checking? }
                   if ((cs_check_range in current_settings.localswitches) or
                     (cs_check_overflow in current_settings.localswitches)) and
-                    (tai_real_32bit(current_asmdata.asmlists[al_typedconsts].last).value=MathInf.Value) then
+                    (tai_real_32bit(current_procinfo.aktlocaldata.last).value=MathInf.Value) then
                     Message(parser_e_range_check_error);
                 end;
 
@@ -94,7 +94,7 @@ interface
                   { range checking? }
                   if ((cs_check_range in current_settings.localswitches) or
                     (cs_check_overflow in current_settings.localswitches)) and
-                    (tai_real_64bit(current_asmdata.asmlists[al_typedconsts].last).value=MathInf.Value) then
+                    (tai_real_64bit(current_procinfo.aktlocaldata.last).value=MathInf.Value) then
                     Message(parser_e_range_check_error);
                end;
 
@@ -105,7 +105,7 @@ interface
                   { range checking? }
                   if ((cs_check_range in current_settings.localswitches) or
                     (cs_check_overflow in current_settings.localswitches)) and
-                    (tai_real_80bit(current_asmdata.asmlists[al_typedconsts].last).value=MathInf.Value) then
+                    (tai_real_80bit(current_procinfo.aktlocaldata.last).value=MathInf.Value) then
                     Message(parser_e_range_check_error);
                 end;
 {$ifdef cpufloat128}
@@ -116,7 +116,7 @@ interface
                   { range checking? }
                   if ((cs_check_range in current_settings.localswitches) or
                     (cs_check_overflow in current_settings.localswitches)) and
-                    (tai_real_128bit(current_asmdata.asmlists[al_typedconsts].last).value=MathInf.Value) then
+                    (tai_real_128bit(current_procinfo.aktlocaldata.last).value=MathInf.Value) then
                     Message(parser_e_range_check_error);
                 end;
 {$endif cpufloat128}