From 86a61e862d05ddcbb4b78b850ecfa512ba5fdbfe Mon Sep 17 00:00:00 2001 From: jonas Date: Mon, 18 Aug 2014 22:36:43 +0000 Subject: * changed forcesize parameter of tgobj.gethltemp() from aint into asizeint, as that one represents memory sizes while aint represents code generator immediate operands git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@28458 3ad0048d-3df7-0310-abae-a5850022a9f2 --- compiler/tgobj.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'compiler/tgobj.pas') diff --git a/compiler/tgobj.pas b/compiler/tgobj.pas index 30bcb55470..6c47ba2ad0 100644 --- a/compiler/tgobj.pas +++ b/compiler/tgobj.pas @@ -92,7 +92,7 @@ unit tgobj; the forcesize parameter is so that it can be used for defs that don't have an inherent size (e.g., array of const) } - procedure gethltemp(list: TAsmList; def: tdef; forcesize: aint; temptype: ttemptype; out ref: treference); virtual; + procedure gethltemp(list: TAsmList; def: tdef; forcesize: asizeint; temptype: ttemptype; out ref: treference); virtual; procedure gethltemptyped(list: TAsmList; def: tdef; temptype: ttemptype; out ref: treference); virtual; procedure gettemp(list: TAsmList; size, alignment : longint;temptype:ttemptype;out ref : treference); procedure gettemptyped(list: TAsmList; def:tdef;temptype:ttemptype;out ref : treference); @@ -521,7 +521,7 @@ implementation end; - procedure ttgobj.gethltemp(list: TAsmList; def: tdef; forcesize: aint; temptype: ttemptype; out ref: treference); + procedure ttgobj.gethltemp(list: TAsmList; def: tdef; forcesize: asizeint; temptype: ttemptype; out ref: treference); begin gettemp(list,forcesize,def.alignment,temptype,ref); end; -- cgit v1.2.1