paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 05:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed addr_pic check (symbol-relsymbol is also always

Browse Source 
position-independent)

git-svn-id: trunk@9352 -
This commit is contained in:
Jonas Maebe 2007-11-29 21:50:01 +00:00
parent cbac667753
commit 5a7809394e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/aasmtai.pas
View File

@ -1926,6 +1926,7 @@ implementation
{$endif} {$endif}
if (cs_create_pic in current_settings.moduleswitches) and if (cs_create_pic in current_settings.moduleswitches) and
assigned(r.symbol) and assigned(r.symbol) and
not assigned(r.relsymbol) and
(r.refaddr=addr_no) then (r.refaddr=addr_no) then
internalerror(200502052); internalerror(200502052);
typ:=top_ref; typ:=top_ref;