4 s/\n[^\n]*!globals.h[^\n]*\n/\n/sog;
6 s/(enum\s.*?{.*?})/munge($1)/soge;
7 s/^(\s*)([a-zA-Z_])/$1extern $2/mog;
8 s/extern (extern|enum)/$1/sog;
9 s/\n\s*extern static[^\n]*\n/\n/sog;
12 s/#include "winsup\.h"\n//so;
17 print <<PRELUDE,$_,"#endif /*_GLOBALS_H*/\n";
18 /* $target - Autogenerated from @argv. Look there for comments. */
25 $val =~ s/\n/-NL-/sog;