summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2020-04-26 16:39:36 +0000
committernickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2020-04-26 16:39:36 +0000
commitde4a779e10d5fd70bcb8267db670baed9e7c2064 (patch)
tree28169ce72fd32a09a255686238d73ba06d69e522
parentde0ef5519fcd88d384c20fc00942df9d052748b5 (diff)
downloadfpc-de4a779e10d5fd70bcb8267db670baed9e7c2064.tar.gz
- removed commented out code from tcgz80.a_load_ref_cgpara
git-svn-id: https://svn.freepascal.org/svn/fpc/branches/z80@45107 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/z80/cgcpu.pas17
1 files changed, 0 insertions, 17 deletions
diff --git a/compiler/z80/cgcpu.pas b/compiler/z80/cgcpu.pas
index d75f50a2b4..ad38313567 100644
--- a/compiler/z80/cgcpu.pas
+++ b/compiler/z80/cgcpu.pas
@@ -558,23 +558,6 @@ unit cgcpu;
else
internalerror(2020040803);
end;
- //if tcgsize2size[paraloc^.size]<cgpara.alignment then
- // begin
- // tmpreg:=getintregister(list,pushsize);
- // a_load_ref_reg(list,paraloc^.size,pushsize,href,tmpreg);
- // list.concat(taicpu.op_reg(A_PUSH,opsize,tmpreg));
- // end
- //else
- // begin
- // make_simple_ref(list,href);
- // if tcgsize2size[pushsize] > 2 then
- // begin
- // tmpref := href;
- // Inc(tmpref.offset, 2);
- // list.concat(taicpu.op_ref(A_PUSH,TCgsize2opsize[int_cgsize(tcgsize2size[pushsize]-2)],tmpref));
- // end;
- // list.concat(taicpu.op_ref(A_PUSH,opsize,href));
- // end;
end;
var