From 1b9043bb5ee28cabe60d5dc8a9c4365e365c7ca0 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Wed, 19 Jan 2011 10:34:01 +0000 Subject: [PATCH] Remove Mac OS classic code from the Errno.pm generation script. --- ext/Errno/Errno_pm.PL | 26 +++++++------------------- 1 file changed, 7 insertions(+), 19 deletions(-) diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL index 52c1266..5621abd 100644 --- a/ext/Errno/Errno_pm.PL +++ b/ext/Errno/Errno_pm.PL @@ -81,19 +81,12 @@ sub process_file { } } - if ($^O eq 'MacOS') { - while() { - $err{$1} = $2 - if /^\s*#\s*define\s+(E\w+)\s+(\d+)/; - } - } else { - while() { - $err{$1} = 1 - if /^\s*#\s*define\s+(E\w+)\s+/; - if ($IsMSWin32) { - $wsa{$1} = 1 - if /^\s*#\s*define\s+WSA(E\w+)\s+/; - } + while() { + $err{$1} = 1 + if /^\s*#\s*define\s+(E\w+)\s+/; + if ($IsMSWin32) { + $wsa{$1} = 1 + if /^\s*#\s*define\s+WSA(E\w+)\s+/; } } @@ -154,11 +147,6 @@ sub get_files { my $linux_errno_h = -e '/usr/include/errno.h' ? '/usr/include/errno.h' : '/usr/local/include/errno.h'; $file{$linux_errno_h} = 1; - } elsif ($^O eq 'MacOS') { - # note that we are only getting the GUSI errno's here ... - # we might miss out on compiler-specific ones - $file{"$ENV{GUSI}include:sys:errno.h"} = 1; - } elsif ($^O eq 'beos' || $^O eq 'haiku') { # hidden in a special place $file{'/boot/develop/headers/posix/errno.h'} = 1; @@ -254,7 +242,7 @@ sub write_errno_pm { close(CPPI); - unless ($^O eq 'MacOS' || $^O eq 'beos') { # trust what we have / get later + unless ($^O eq 'beos') { # trust what we have / get later # invoke CPP and read the output if ($^O eq 'VMS') { -- 2.7.4