From 97cb92d6c0700e9454bd4ae6d4ab867918bf7861 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Mon, 9 Dec 2013 22:18:22 +0100
Subject: Purge sfio support, which has been broken for a decade.

The last Perl release that built with -Dusesfio was v5.8.0, and even that
failed many regression tests. Every subsequent release fails to build, and
in the decade that has passed we have had no bug reports about this. So it's
safe to delete all the code. The Configure related code will be purged in a
subsequent commit.

2 references to sfio intentionally remain in fakesdio.h and nostdio.h, as
these appear to be for using its stdio API-compatibility layer.
---
 t/io/fflush.t | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 't/io/fflush.t')

diff --git a/t/io/fflush.t b/t/io/fflush.t
index 4570f891b9..0bbfa545e6 100644
--- a/t/io/fflush.t
+++ b/t/io/fflush.t
@@ -19,12 +19,11 @@ use strict;
 # it here too or expect test gratuitous test failures.
 my $useperlio = defined $Config{useperlio} ? $Config{useperlio} eq 'define' ? 1 : 0 : 0;
 my $fflushNULL = defined $Config{fflushNULL} ? $Config{fflushNULL} eq 'define' ? 1 : 0 : 0;
-my $d_sfio = defined $Config{d_sfio} ? $Config{d_sfio} eq 'define' ? 1 : 0 : 0;
 my $fflushall = defined $Config{fflushall} ? $Config{fflushall} eq 'define' ? 1 : 0 : 0;
 my $d_fork = defined $Config{d_fork} ? $Config{d_fork} eq 'define' ? 1 : 0 : 0;
 
 skip_all('fflush(NULL) or equivalent not available')
-    unless $useperlio || $fflushNULL || $d_sfio || $fflushall;
+    unless $useperlio || $fflushNULL || $fflushall;
 
 plan(tests => 7);
 
-- 
cgit v1.2.1