浏览代码

- removed some unneeded and sometimes wrong typecasts (could be
typeconv nodes as well rather than direct setelementn)

git-svn-id: trunk@6186 -

Jonas Maebe 18 年之前
父节点
当前提交
d3ea2fa9e3
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/nadd.pas

+ 2 - 2
compiler/nadd.pas

@@ -1804,8 +1804,8 @@ implementation
                           if assigned(tsetelementnode(right).right) then
                           if assigned(tsetelementnode(right).right) then
                             addstatement(newstatement,ccallnode.createintern('fpc_varset_set_range',
                             addstatement(newstatement,ccallnode.createintern('fpc_varset_set_range',
                               ccallparanode.create(cordconstnode.create(resultdef.size,sinttype,false),
                               ccallparanode.create(cordconstnode.create(resultdef.size,sinttype,false),
-                              ccallparanode.create(ctypeconvnode.create_internal(tsetelementnode(tsetelementnode(right).right),sinttype),
-                              ccallparanode.create(ctypeconvnode.create_internal(tsetelementnode(tsetelementnode(right).left),sinttype),
+                              ccallparanode.create(ctypeconvnode.create_internal(tsetelementnode(right).right,sinttype),
+                              ccallparanode.create(ctypeconvnode.create_internal(tsetelementnode(right).left,sinttype),
                               ccallparanode.create(ctemprefnode.create(temp),
                               ccallparanode.create(ctemprefnode.create(temp),
                               ccallparanode.create(left,nil))))))
                               ccallparanode.create(left,nil))))))
                             )
                             )