diff options
Diffstat (limited to 'winsup/cygwin/mkglobals_h')
-rwxr-xr-x | winsup/cygwin/mkglobals_h | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/winsup/cygwin/mkglobals_h b/winsup/cygwin/mkglobals_h deleted file mode 100755 index ea4a582f4..000000000 --- a/winsup/cygwin/mkglobals_h +++ /dev/null @@ -1,28 +0,0 @@ -#!/usr/bin/perl -my @argv = @ARGV; -$_ = join('', <>); -s/\n[^\n]*!globals.h[^\n]*\n/\n/sog; -s%/\*.*?\*/%%sog; -s/(enum\s.*?{.*?})/munge($1)/soge; -s/^(\s*)([a-zA-Z_])/$1extern $2/mog; -s/extern (extern|enum)/$1/sog; -s/\n\s*extern static[^\n]*\n/\n/sog; -s/\s+=.*?;/;/sog; -s/^\n+//sog; -s/#include "winsup\.h"\n//so; -s/-NL-/\n/sog; -s/-EQ-/=/sog; -s/\s+\n/\n/sog; -s/\n{2,}/\n/sog; -print <<PRELUDE,$_; -/* $target - Autogenerated from @argv. Look there for comments. */ - -#pragma once -PRELUDE -close $target_fd; -sub munge($) { - my $val = shift; - $val =~ s/\n/-NL-/sog; - $val =~ s/=/-EQ-/sog; - return $val; -} |