Fix invalid typecast revealed by -CriotR option

git-svn-id: trunk@44108 -

compiler/ncnv.pas

@@ -1529,7 +1529,7 @@ implementation
             begin
               result:=cmoddivnode.create(divn,getcopy,cordconstnode.create(10000,resultdef,false));
               include(result.flags,nf_is_currency);
-              include(taddnode(result).left.flags,nf_internal);
+              include(tmoddivnode(result).left.flags,nf_internal);
             end;
          end;
       end;