paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-06 16:58:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fixed typo

Browse Source 
git-svn-id: trunk@30238 -
This commit is contained in:
Jeppe Johansen 2015-03-15 15:47:45 +00:00
parent 38a72f2ddb
commit 60f24739fc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/assemble.pas
View File

@ -1549,7 +1549,7 @@ Implementation
end; end;
ait_symbolpair: ait_symbolpair:
begin begin
if tai_symbolpair(hp).kind<>spk_set then if tai_symbolpair(hp).kind=spk_set then
begin begin
objsym:=ObjData.symbolref(tai_symbolpair(hp).sym^); objsym:=ObjData.symbolref(tai_symbolpair(hp).sym^);
ref:=objdata.symbolref(tai_symbolpair(hp).value^); ref:=objdata.symbolref(tai_symbolpair(hp).value^);