Browse Source

* removed unnecessary "as" expressions

git-svn-id: trunk@28471 -
Jonas Maebe 11 years ago
parent
commit
a4a54fa344
1 changed files with 8 additions and 8 deletions
  1. 8 8
      compiler/pdecsub.pas

+ 8 - 8
compiler/pdecsub.pas

@@ -1827,8 +1827,8 @@ begin
           else
           else
             Message(parser_e_32bitint_or_pointer_variable_expected);
             Message(parser_e_32bitint_or_pointer_variable_expected);
         end;
         end;
-      (paramanager as tm68kparamanager).create_funcretloc_info(pd,calleeside);
-      (paramanager as tm68kparamanager).create_funcretloc_info(pd,callerside);
+      paramanager.create_funcretloc_info(pd,calleeside);
+      paramanager.create_funcretloc_info(pd,callerside);
 
 
       v:=get_intconst;
       v:=get_intconst;
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
@@ -1858,8 +1858,8 @@ begin
             Message(parser_e_32bitint_or_pointer_variable_expected);
             Message(parser_e_32bitint_or_pointer_variable_expected);
         end;
         end;
 
 
-      (paramanager as tppcparamanager).create_funcretloc_info(pd,calleeside);
-      (paramanager as tppcparamanager).create_funcretloc_info(pd,callerside);
+      paramanager.create_funcretloc_info(pd,calleeside);
+      paramanager.create_funcretloc_info(pd,callerside);
 
 
       v:=get_intconst;
       v:=get_intconst;
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
@@ -1950,8 +1950,8 @@ begin
           else
           else
             Message(parser_e_32bitint_or_pointer_variable_expected);
             Message(parser_e_32bitint_or_pointer_variable_expected);
         end;
         end;
-      (paramanager as tppcparamanager).create_funcretloc_info(pd,calleeside);
-      (paramanager as tppcparamanager).create_funcretloc_info(pd,callerside);
+      paramanager.create_funcretloc_info(pd,calleeside);
+      paramanager.create_funcretloc_info(pd,callerside);
 
 
       v:=get_intconst;
       v:=get_intconst;
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
@@ -1981,8 +1981,8 @@ begin
             Message(parser_e_32bitint_or_pointer_variable_expected);
             Message(parser_e_32bitint_or_pointer_variable_expected);
         end;
         end;
 
 
-      (paramanager as ti386paramanager).create_funcretloc_info(pd,calleeside);
-      (paramanager as ti386paramanager).create_funcretloc_info(pd,callerside);
+      paramanager.create_funcretloc_info(pd,calleeside);
+      paramanager.create_funcretloc_info(pd,callerside);
 
 
       v:=get_intconst;
       v:=get_intconst;
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then
       if (v<low(Tprocdef(pd).extnumber)) or (v>high(Tprocdef(pd).extnumber)) then