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

- removed FPC_HAS_VALGRINDBOOL-related checks, FPC 2.6.4 has it

Browse Source 
git-svn-id: trunk@31691 -
This commit is contained in:
Jonas Maebe 2015-09-15 11:51:45 +00:00
parent 1c2bac7608
commit 12030f904a
2 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/options.pas
View File

@ -3248,7 +3248,6 @@ begin
def_system_macro('VER'+version_nr+'_'+release_nr+'_'+patch_nr);
{ Temporary defines, until things settle down }
def_system_macro('FPC_HAS_VALGRINDBOOL');
def_system_macro('FPC_HAS_STR_CURRENCY');
def_system_macro('FPC_REAL2REAL_FIXED');
def_system_macro('FPC_STRTOCHARARRAYPROC');

4
rtl/i386/fastmove.inc
View File

@ -869,16 +869,13 @@ asm
end;
{$asmmode att}
{$ifdef FPC_HAS_VALGRINDBOOL}
{$ifndef FPC_HAS_INDIRECT_MAIN_INFORMATION}
var
valgrind_used : boolean;external name '__fpc_valgrind';
{$endif FPC_HAS_INDIRECT_MAIN_INFORMATION}
{$endif FPC_HAS_VALGRINDBOOL}
procedure setup_fastmove;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
{$ifdef FPC_HAS_VALGRINDBOOL}
{ workaround valgrind bug }
{$ifdef FPC_HAS_INDIRECT_MAIN_INFORMATION}
if EntryInformation.valgrind_used then
@ -890,7 +887,6 @@ procedure setup_fastmove;{$ifdef SYSTEMINLINE}inline;{$endif}
fastmoveproc_backward:=@Backwards_Valgrind;
end
else
{$endif FPC_HAS_VALGRINDBOOL}
if has_sse_support then
begin