paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 06:59:33 +01:00
Code Issues Packages Projects Releases Wiki Activity

* add exclude(to_do,threadvarsegment) to assemble.pas to temporarily fix

Browse Source 
reported problem.

git-svn-id: trunk@748 -
This commit is contained in:
daniel 2005-07-25 20:03:26 +00:00
parent bcb717f7ea
commit 603e165761
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/assemble.pas
View File

@ -1606,6 +1606,9 @@ Implementation
exclude(to_do,exportsection);
{$warning TODO internal writer support for dwarf}
exclude(to_do,dwarflist);
{$ifndef segment_threadvars}
exclude(to_do,threadvarsegment);
{$endif}
for i:=low(Tasmlist) to high(Tasmlist) do
if (i in to_do) and (asmlist[i]<>nil) then
addlist(asmlist[i]);