From 53a6e4eed6ab5d219453c85dfc1fe52538ec9c32 Mon Sep 17 00:00:00 2001 From: florian Date: Mon, 30 Oct 2006 22:37:31 +0000 Subject: * germanism removed (aktfilepos -> current_filepos) git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@5099 3ad0048d-3df7-0310-abae-a5850022a9f2 --- compiler/ncgset.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/ncgset.pas') diff --git a/compiler/ncgset.pas b/compiler/ncgset.pas index c89a0a3018..a6da7d3d23 100644 --- a/compiler/ncgset.pas +++ b/compiler/ncgset.pas @@ -845,7 +845,7 @@ implementation cg.a_label(current_asmdata.CurrAsmList,pcaseblock(blocks[i])^.blocklabel); secondpass(pcaseblock(blocks[i])^.statement); { don't come back to case line } - aktfilepos:=current_asmdata.CurrAsmList.getlasttaifilepos^; + current_filepos:=current_asmdata.CurrAsmList.getlasttaifilepos^; {$ifdef OLDREGVARS} load_all_regvars(current_asmdata.CurrAsmList); {$endif OLDREGVARS} -- cgit v1.2.1