paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-15 10:51:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

* external vars are not regable

Browse Source
This commit is contained in:
Jonas Maebe 2004-12-11 15:19:08 +00:00
parent 78bff4ff2e
commit d7c52f4062
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/pdecvar.pas
View File

@ -1113,6 +1113,7 @@ implementation
add it to the externals } add it to the externals }
if extern_var then if extern_var then
begin begin
vs.varregable := vr_none;
if is_dll then if is_dll then
begin begin
if not(current_module.uses_imports) then if not(current_module.uses_imports) then
@ -1306,7 +1307,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.87 2004-12-07 16:11:52 peter Revision 1.88 2004-12-11 15:19:08 jonas
* external vars are not regable
Revision 1.87 2004/12/07 16:11:52 peter
* set vo_explicit_paraloc flag * set vo_explicit_paraloc flag
Revision 1.86 2004/11/29 18:50:15 peter Revision 1.86 2004/11/29 18:50:15 peter