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

* removed misleading non-working automatic save/restore of registers for profiling code (must be done manually in tcg.g_profilecode)

Browse Source 
git-svn-id: trunk@3269 -
This commit is contained in:
tom_at_work 2006-04-18 09:59:12 +00:00
parent 2b3c7280d8
commit 7a068de50a
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/ncgutil.pas
View File

@ -1691,9 +1691,7 @@ implementation
if not (target_info.system in [system_i386_win32,system_i386_wdosx]) or if not (target_info.system in [system_i386_win32,system_i386_wdosx]) or
not (current_procinfo.procdef.proctypeoption=potype_proginit) then not (current_procinfo.procdef.proctypeoption=potype_proginit) then
begin begin
cg.allocallcpuregisters(list);
cg.g_profilecode(list); cg.g_profilecode(list);
cg.deallocallcpuregisters(list);
end; end;
end; end;