From b5525e6868ef0ad48a3350e324a271cc99817250 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 21 Jul 2014 21:12:09 -0400
Subject: Avoid undefined warnings.

---
 t/porting/libperl.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/porting/libperl.t b/t/porting/libperl.t
index b20cbf62c6..d7276fe533 100644
--- a/t/porting/libperl.t
+++ b/t/porting/libperl.t
@@ -456,7 +456,8 @@ for my $symbol (sort keys %expected) {
     my @o = exists $symbols{undef}{$symbol} ?
         sort keys %{ $symbols{undef}{$symbol} } : ();
     # In some FreeBSD versions memcmp disappears (compiler inlining?).
-    if (($^O eq 'freebsd' || $fake_style eq 'freebsd') &&
+    if (($^O eq 'freebsd' ||
+         (defined $fake_style && $fake_style eq 'freebsd')) &&
         $symbol eq 'memcmp' && @o == 0) {
         SKIP: {
             skip("freebsd memcmp");
-- 
cgit v1.2.1