summaryrefslogtreecommitdiff
path: root/compiler/ncgutil.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/ncgutil.pas')
-rw-r--r--compiler/ncgutil.pas12
1 files changed, 6 insertions, 6 deletions
diff --git a/compiler/ncgutil.pas b/compiler/ncgutil.pas
index e4d7c2b040..84d1082fc6 100644
--- a/compiler/ncgutil.pas
+++ b/compiler/ncgutil.pas
@@ -273,8 +273,8 @@ implementation
begin
if nf_error in p.flags then
exit;
- storepos:=aktfilepos;
- aktfilepos:=p.fileinfo;
+ storepos:=current_filepos;
+ current_filepos:=p.fileinfo;
if is_boolean(p.resultdef) then
begin
{$ifdef OLDREGVARS}
@@ -324,7 +324,7 @@ implementation
end
else
internalerror(200112305);
- aktfilepos:=storepos;
+ current_filepos:=storepos;
end;
@@ -2159,8 +2159,8 @@ implementation
list : TAsmList;
sectype : TAsmSectiontype;
begin
- storefilepos:=aktfilepos;
- aktfilepos:=sym.fileinfo;
+ storefilepos:=current_filepos;
+ current_filepos:=sym.fileinfo;
l:=sym.getsize;
if tf_section_threadvars in target_info.flags then
begin
@@ -2195,7 +2195,7 @@ implementation
list.concat(Tai_datablock.create_global(sym.mangledname,l))
else
list.concat(Tai_datablock.create(sym.mangledname,l));
- aktfilepos:=storefilepos;
+ current_filepos:=storefilepos;
end;