summaryrefslogtreecommitdiff
path: root/compiler/pdecsub.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/pdecsub.pas')
-rw-r--r--compiler/pdecsub.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/pdecsub.pas b/compiler/pdecsub.pas
index 1eff07c756..192d261ae8 100644
--- a/compiler/pdecsub.pas
+++ b/compiler/pdecsub.pas
@@ -725,7 +725,7 @@ implementation
Message(parser_e_methode_id_expected);
{ rename the name to an unique name to avoid an
error when inserting the symbol in the symtable }
- orgsp:=orgsp+'$'+tostr(aktfilepos.line);
+ orgsp:=orgsp+'$'+tostr(current_filepos.line);
aprocsym:=nil;
end;
end
@@ -784,7 +784,7 @@ implementation
DuplicateSym(nil,srsym);
{ rename the name to an unique name to avoid an
error when inserting the symbol in the symtable }
- orgsp:=orgsp+'$'+tostr(aktfilepos.line);
+ orgsp:=orgsp+'$'+tostr(current_filepos.line);
end;
end;
end;