diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2014-07-21 13:29:27 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2014-07-21 15:22:41 -0400 |
| commit | d2f5d4f944d5cf66f47878e9def88f1c3a12c12d (patch) | |
| tree | f5b9a12d2b4c714cd684754bb364976f86f0a0b9 /t | |
| parent | da62e549ffa1848a7e6a1594fc77d89e722b9bf0 (diff) | |
| download | perl-d2f5d4f944d5cf66f47878e9def88f1c3a12c12d.tar.gz | |
In FreeBSD memcmp symbol can disappear.
Diffstat (limited to 't')
| -rw-r--r-- | t/porting/libperl.t | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/t/porting/libperl.t b/t/porting/libperl.t index d272ffe8ab..b20cbf62c6 100644 --- a/t/porting/libperl.t +++ b/t/porting/libperl.t @@ -455,7 +455,15 @@ for my $symbol (sort keys %expected) { } my @o = exists $symbols{undef}{$symbol} ? sort keys %{ $symbols{undef}{$symbol} } : (); - ok(@o, "uses $symbol (@o)"); + # In some FreeBSD versions memcmp disappears (compiler inlining?). + if (($^O eq 'freebsd' || $fake_style eq 'freebsd') && + $symbol eq 'memcmp' && @o == 0) { + SKIP: { + skip("freebsd memcmp"); + } + } else { + ok(@o, "uses $symbol (@o)"); + } } # There are certain symbols we expect NOT to see. |