This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrated changes on mainline into the win32 branch. Had to set
authorGurusamy Sarathy <gsar@cpan.org>
Fri, 10 Oct 1997 20:58:40 +0000 (20:58 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Fri, 10 Oct 1997 20:58:40 +0000 (20:58 +0000)
P4USER=mbeattie for the resolve step (due to the presence of newly
branched files that had not been submitted?)

p4raw-id: //depot/win32/perl@122

1  2 
Porting/makerel
Porting/patchls
README.threads
win32/config.bc
win32/config.vc
win32/config_H.bc
win32/config_H.vc
win32/makefile.mk

diff --cc Porting/makerel
index 0000000,bc472ee..0476ab5
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,97 +1,90 @@@
 -if ("@$missentry" =~ m/\.orig\b/) {
 -    # Handy listing of find command and .orig files from patching work.
 -    # I tend to run 'xargs rm' and copy and paste the file list.
 -    my $cmd = "find . -name '*.orig' -print";
 -    print "$cmd\n";
 -    system($cmd);
 -}
+ #!/bin/env perl -w
+ # A first attempt at some automated support for making a perl release.
+ # Very basic but functional - if you're on a unix system.
+ #
+ # No matter how automated this gets, you'll always need to read
+ # and re-read pumpkin.pod checking for things to be done at various
+ # stages of the process.
+ #
+ # Tim Bunce, June 1997
+ use ExtUtils::Manifest qw(fullcheck);
+ $|=1;
+ $relroot = "..";      # XXX make an option
+ die "Must be in root of the perl source tree.\n"
+       unless -f "./MANIFEST" and -f "patchlevel.h";
+ $patchlevel_h = `grep '#define ' patchlevel.h`;
+ print $patchlevel_h;
+ $patchlevel = $1 if $patchlevel_h =~ /PATCHLEVEL\s+(\d+)/;
+ $subversion = $1 if $patchlevel_h =~ /SUBVERSION\s+(\d+)/;
+ die "Unable to parse patchlevel.h" unless $subversion > 0;
+ $vers = sprintf("5.%03d", $patchlevel);
+ $vers.= sprintf( "_%02d", $subversion) if $subversion;
+ $perl = "perl$vers";
+ $reldir = "$relroot/$perl";
+ print "\nMaking a release for $perl in $reldir\n\n";
+ print "Cross-checking the MANIFEST...\n";
+ ($missfile, $missentry) = fullcheck();
+ warn "Can't make a release with MANIFEST files missing.\n" if @$missfile;
+ warn "Can't make a release with files not listed in MANIFEST.\n" if @$missentry;
+ die "Aborted.\n" if @$missentry or @$missfile;
+ print "\n";
+ print "Setting file permissions...\n";
+ system("find . -type f -print | xargs chmod -w");
+ system("chmod +w configure"); # special case (see pumpkin.pod)
+ @exe = qw(
+     Configure
+     configpm
+     configure
+     embed.pl
+     installperl
+     installman
+     keywords.pl
+     myconfig
+     opcode.pl
+     perly.fixer
+     t/TEST
+     t/*/*.t
+     *.SH
+     vms/ext/Stdio/test.pl
+     vms/ext/filespec.t
+     vms/fndvers.com
+     x2p/*.SH
+     Porting/patchls
+     Porting/makerel
+ );
+ system("chmod +x @exe");
+ print "\n";
+ print "Creating $reldir release directory...\n";
+ die "$reldir release directory already exists\n"   if -e "../$perl";
+ die "$reldir.tar.gz release file already exists\n" if -e "../$perl.tar.gz";
+ mkdir($reldir, 0755) or die "mkdir $reldir: $!\n";
+ print "\n";
+ print "Copying files to release directory...\n";
+ # ExtUtils::Manifest maniread does not preserve the order
+ $cmd = "awk '{print \$1}' MANIFEST | cpio -pdm $reldir";
+ system($cmd) == 0 or die "$cmd failed";
+ print "\n";
+ chdir $relroot or die $!;
+ print "Creating and compressing the tar file...\n";
+ $cmd = "tar cf - $perl | gzip --best > $perl.tar.gz";
+ system($cmd) == 0 or die "$cmd failed";
+ print "\n";
+ system("ls -ld $perl*");
diff --cc Porting/patchls
index 0000000,f4de529..b3e968d
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,369 +1,324 @@@
 -die q{
+ #!/bin/perl -w
+ # 
+ #     patchls - patch listing utility
+ #
+ # Input is one or more patchfiles, output is a list of files to be patched.
+ #
+ # Copyright (c) 1997 Tim Bunce. All rights reserved.
+ # This program is free software; you can redistribute it and/or
+ # modify it under the same terms as Perl itself.
+ #
+ # With thanks to Tom Horsley for the seed code.
+ #
+ # $Id: patchls,v 1.3 1997/06/10 21:38:45 timbo Exp $
+ use Getopt::Std;
+ use Text::Wrap qw(wrap $columns);
+ use Text::Tabs qw(expand unexpand);
+ use strict;
+ sub usage {
 -    -i     Invert: for each patched file list which patch files patch it.
 -    -h     no filename headers (like grep), only the listing.
 -    -l     no listing (like grep), only the filename headers.
 -    -c     Categorise the patch and sort by category (perl specific).
 -    -m     print formatted Meta-information (Subject,From,Msg-ID etc).
 -    -p N   strip N levels of directory Prefix (like patch), else automatic.
 -    -v     more verbose (-d for noisy debugging).
 -    -f F   only list patches which patch files matching regexp F
 -           (F has $ appended unless it contains a /).
 -    -I     just gather and display summary Information about the patches.
++die qq{
++
+   patchls [options] patchfile [ ... ]
 -$::opt_f = '';
 -$::opt_I = 0;
++    -i     Invert: for each patched file list which patch files patch it
++    -h     no filename headers (like grep), only the listing
++    -l     no listing (like grep), only the filename headers
++    -c     Categorise the patch and sort by category (perl specific)
++    -m     print formatted Meta-information (Subject,From,Msg-ID etc)
++    -p N   strip N levels of directory Prefix (like patch), else automatic
++    -v     more verbose (-d for noisy debugging)
++
+ }
+ }
+ $columns = 70;
+ $::opt_p = undef;     # undef != 0
+ $::opt_d = 0;
+ $::opt_v = 0;
+ $::opt_m = 0;
+ $::opt_i = 0;
+ $::opt_h = 0;
+ $::opt_l = 0;
+ $::opt_c = 0;
 -getopts("mihlvcp:f:I") or usage;
+ usage unless @ARGV;
 -    'BUILD'   => 'BUILD PROCESS',
 -    'CORE'    => 'CORE LANGUAGE',
 -    'DOC'     => 'DOCUMENTATION',
 -    'LIB'     => 'LIBRARY AND EXTENSIONS',
 -    'PORT1'   => 'PORTABILITY - WIN32',
 -    'PORT2'   => 'PORTABILITY - OTHER',
++getopts("mihlvcp:") or usage;
+ my %cat_title = (
 -    'OTHER'   => 'OTHER CHANGES',
+     'TEST'    => 'TESTS',
++    'DOC'     => 'DOCUMENTATION',
+     'UTIL'    => 'UTILITIES',
 -          $ls->{From}{$1}=1       if /^From:\s+(.*\S)/i;
 -          $ls->{Title}{$1}=1      if /^Subject:\s+(?:Re: )?(.*\S)/i;
 -          $ls->{'Msg-ID'}{$1}=1   if /^Message-Id:\s+(.*\S)/i;
 -          $ls->{Date}{$1}=1       if /^Date:\s+(.*\S)/i;
++    'PORT'    => 'PORTABILITY',
++    'LIB'     => 'LIBRARY AND EXTENSIONS',
++    'CORE'    => 'CORE LANGUAGE',
++    'BUILD'   => 'BUILD PROCESS',
++    'OTHER'   => 'OTHER',
+ );
+ my %ls;
+ # Style 1:
+ #     *** perl-5.004/embed.h  Sat May 10 03:39:32 1997
+ #     --- perl-5.004.fixed/embed.h    Thu May 29 19:48:46 1997
+ #     ***************
+ #     *** 308,313 ****
+ #     --- 308,314 ----
+ #
+ # Style 2:
+ #     --- perl5.004001/mg.c   Sun Jun 08 12:26:24 1997
+ #     +++ perl5.004-bc/mg.c   Sun Jun 08 11:56:08 1997
+ #     @@ -656,9 +656,27 @@
+ # or (rcs, note the different date format)
+ #     --- 1.18        1997/05/23 19:22:04
+ #     +++ ./pod/perlembed.pod 1997/06/03 21:41:38
+ #
+ # Variation:
+ #     Index: embed.h
+ my($in, $prevline, $prevtype, $ls);
+ foreach my $argv (@ARGV) {
+     $in = $argv;
+     unless (open F, "<$in") {
+       warn "Unable to open $in: $!\n";
+       next;
+     }
+     print "Reading $in...\n" if $::opt_v and @ARGV > 1;
+     $ls = $ls{$in} ||= { is_in => 1, in => $in };
+     my $type;
+     while (<F>) {
+       unless (/^([-+*]{3}) / || /^(Index):/) {
+           # not an interesting patch line but possibly meta-information
+           next unless $::opt_m;
 -if ($::opt_f) {               # filter out patches based on -f <regexp>
 -    my $out;
 -    $::opt_f .= '$' unless $::opt_f =~ m:/:;
 -    @ls = grep {
 -      my @out = keys %{$_->{out}};
 -      my $match = 0;
 -      for $out (@out) {
 -          ++$match if $out =~ m/$::opt_f/o;
 -      }
 -      $match;
 -    } @ls;
 -}
 -
 -if ($::opt_I) {
 -    my $n_patches = 0;
 -    my($in,$out);
 -    my %all_out;
 -    foreach $in (@ls) {
 -      next unless $in->{is_in};
 -      ++$n_patches;
 -      my @outs = keys %{$in->{out}};
 -      @all_out{@outs} = ($in->{in}) x @outs;
 -    }
 -    my @all_out = sort keys %all_out;
 -    my @missing = grep { ! -f $_ } @all_out;
 -    print "$n_patches patch files patch ".@all_out." files (".@missing." missing)\n";
 -    if ($::opt_v and @missing) {
 -      print "Missing files:\n";
 -      foreach $out (@missing) {
 -          printf "  %-20s\t%s\n", $out, $all_out{$out};
 -      }
 -    }
 -    exit 0+@missing;
 -}
 -
++          $ls->{From}{$1}=1       if /^From: (.*\S)/i;
++          $ls->{Title}{$1}=1      if /^Subject: (?:Re: )?(.*\S)/i;
++          $ls->{'Msg-ID'}{$1}=1   if /^Message-Id: (.*\S)/i;
++          $ls->{Date}{$1}=1       if /^Date: (.*\S)/i;
+           next;
+       }
+       $type = $1;
+       next if /^--- [0-9,]+ ----$/ || /^\*\*\* [0-9,]+ \*\*\*\*$/;
+       print "Last: $prevline","This: ${_}Got:  $1\n\n" if $::opt_d;
+       # Some patches have Index lines but not diff headers
+       # Patch copes with this, so must we. It's also handy for
+       # documenting manual changes by simply adding Index: lines
+       # to the file which describes the problem bing fixed.
+       add_file($ls, $1), next if /^Index:\s+(.*)/;
+       if (    ($type eq '---' and $prevtype eq '***') # Style 1
+           or  ($type eq '+++' and $prevtype eq '---') # Style 2
+       ) {
+           if (/^[-+*]{3} (\S+)\s+.*\d\d:\d\d:\d\d/) { # double check
+               add_file($ls, $1);
+           }
+           else {
+               warn "$in $.: parse error (prev $prevtype, type $type)\n$prevline$_";
+           }
+       }
+     }
+     continue {
+       $prevline = $_;
+       $prevtype = $type;
+       $type = '';
+     }
+     # if we don't have a title for -m then use the file name
+     $ls->{Title}{$in}=1 if $::opt_m
+       and !$ls->{Title} and $ls->{out};
+     $ls->{category} = $::opt_c
+       ? categorize_files([keys %{ $ls->{out} }], $::opt_v) : '';
+ }
+ print scalar(@ARGV)." files read.\n" if $::opt_v and @ARGV > 1;
+ my @ls  = sort {
+     $a->{category} cmp $b->{category} || $a->{in} cmp $b->{in}
+ } values %ls;
 -      print "\n  ------  $cat_title{$ls->{category}}  ------\n"
 -          if $ls->{category} ne $c;
+ unless ($::opt_c and $::opt_m) {
+     foreach $ls (@ls) {
+       next unless ($::opt_i) ? $ls->{is_out} : $ls->{is_in};
+       list_files_by_patch($ls);
+     }
+ }
+ else {
+     my $c = '';
+     foreach $ls (@ls) {
+       next unless ($::opt_i) ? $ls->{is_out} : $ls->{is_in};
 -    $name =~ s:\\:/:g;        # adjust windows paths
 -    $name =~ s://:/:g;        # simplify (and make win \\share into absolute path)
++      print "\n  $cat_title{$ls->{category}}\n" if $ls->{category} ne $c;
+       $c = $ls->{category};
+       unless ($::opt_i) {
+           list_files_by_patch($ls);
+       }
+       else {
+           my $out = $ls->{in};
+           print "\n$out patched by:\n";
+           # find all the patches which patch $out and list them
+           my @p = grep { $_->{out}->{$out} } values %ls;
+           foreach $ls (@p) {
+               list_files_by_patch($ls, '');
+           }
+       }
+     }
+     print "\n";
+ }
+ exit 0;
+ # ---
+ sub add_file {
+     my $ls = shift;
+     my $out = trim_name(shift);
+     $ls->{out}->{$out} = 1;
+     # do the -i inverse as well, even if we're not doing -i
+     my $i = $ls{$out} ||= {
+       is_out   => 1,
+       in       => $out,
+       category => $::opt_c ? categorize_files([ $out ], $::opt_v) : '',
+     };
+     $i->{out}->{$in} = 1;
+ }
+ sub trim_name {               # reduce/tidy file paths from diff lines
+     my $name = shift;
+     $name = "$name ($in)" if $name eq "/dev/null";
 -      $name =~ s:.*perl[-_]?5?[._]?[-_a-z0-9.+]*/::i;
+     if (defined $::opt_p) {
+       # strip on -p levels of directory prefix
+       my $dc = $::opt_p;
+       $name =~ s:^[^/]+/(.+)$:$1: while $dc-- > 0;
+     }
+     else {    # try to strip off leading path to perl directory
+       # if absolute path, strip down to any *perl* directory first
+       $name =~ s:^/.*?perl.*?/::i;
 -      my $txt = eval { expand(wrap(@_)) };    # die's on long lines!
 -    return $txt unless $@;
 -      return expand("@_");
++      $name =~ s:.*perl[-_]?5\.[-_a-z0-9.]+/::i;
+       $name =~ s:^\./::;
+     }
+     return $name;
+ }
+ sub list_files_by_patch {
+     my($ls, $name) = @_;
+     $name = $ls->{in} unless defined $name;
+     my @meta;
+     if ($::opt_m) {
+       foreach(qw(Title From Msg-ID)) {
+           next unless $ls->{$_};
+           my @list = sort keys %{$ls->{$_}};
+           push @meta, sprintf "%7s:  ", $_;
+           @list = map { "\"$_\"" } @list if $_ eq 'Title';
+           push @meta, my_wrap("","          ", join(", ",@list)."\n");
+       }
+       $name = "\n$name" if @meta and $name;
+     }
+     # don't print the header unless the file contains something interesting
+     return if !@meta and !$ls->{out};
+     print("$ls->{in}\n"),return  if $::opt_l; # -l = no listing
+     # a twisty maze of little options
+     my $cat = ($ls->{category} and !$::opt_m) ? "\t$ls->{category}" : "";
+     print "$name$cat: "       unless ($::opt_h and !$::opt_v) or !"$name$cat";
+     print join('',"\n",@meta) if @meta;
+     my @v = sort PATORDER keys %{ $ls->{out} };
+     my $v = "@v\n";
+     print $::opt_m ? "  Files:  ".my_wrap("","          ",$v) : $v;
+ }
+ sub my_wrap {
 -      $c{PORT1}+= 15,next  if m:^win32:;
 -      $c{PORT2} += 15,next
 -          if m:^(cygwin32|os2|plan9|qnx|vms)/:
++    return expand(wrap(@_));
+ }
+ sub categorize_files {
+     my($files, $verb) = @_;
+     my(%c, $refine);
+     foreach (@$files) {       # assign a score to a file path
+       # the order of some of the tests is important
+       $c{TEST} += 5,next   if m:^t/:;
+       $c{DOC}  += 5,next   if m:^pod/:;
+       $c{UTIL} += 10,next  if m:^(utils|x2p|h2pl)/:;
 -          if m:^[^/]+[\._]([chH]|sym|pl)$:;
++      $c{PORT} += 15,next
++          if m:^(cygwin32|os2|plan9|qnx|vms|win32)/:
+           or m:^(hints|Porting|ext/DynaLoader)/:
+           or m:^README\.:;
+       $c{LIB}  += 10,next
+           if m:^(lib|ext)/:;
+       $c{'CORE'} += 15,next
 -          or m:^(install|configure|configpm):i;
++          if m:^[^/]+[\._]([chH]|sym)$:;
+       $c{BUILD} += 10,next
+           if m:^[A-Z]+$: or m:^[^/]+\.SH$:
++          or m:^(install|configure):i;
+       print "Couldn't categorise $_\n" if $::opt_v;
+       $c{OTHER} += 1;
+     }
+     if (keys %c > 1) {        # sort to find category with highest score
+       refine:
+       ++$refine;
+       my @c = sort { $c{$b} <=> $c{$a} || $a cmp $b } keys %c;
+       my @v = map  { $c{$_} } @c;
+       if (@v > 1 and $refine <= 1 and "@v" =~ /^(\d) \1/
+               and $c[0] =~ m/^(DOC|TESTS|OTHER)/) { # rare
+           print "Tie, promoting $c[1] over $c[0]\n" if $::opt_d;
+           ++$c{$c[1]};
+           goto refine;
+       }
+       print "  ".@$files." patches: ", join(", ", map { "$_: $c{$_}" } @c),".\n"
+           if $verb;
+       return $c[0] || 'OTHER';
+     }
+     else {
+       my($c, $v) = %c;
+       $c ||= 'OTHER'; $v ||= 0;
+       print "  ".@$files." patches: $c: $v\n" if $verb;
+       return $c;
+     }
+ }
+ sub PATORDER {                # PATORDER sort by Chip Salzenberg
+     my ($i, $j);
+     $i = ($a =~ m#^[A-Z]+$#);
+     $j = ($b =~ m#^[A-Z]+$#);
+     return $j - $i if $i != $j;
+     $i = ($a =~ m#configure|hint#i) || ($a =~ m#[S_]H$#);
+     $j = ($b =~ m#configure|hint#i) || ($b =~ m#[S_]H$#);
+     return $j - $i if $i != $j;
+     $i = ($a =~ m#\.pod$#);
+     $j = ($b =~ m#\.pod$#);
+     return $j - $i if $i != $j;
+     $i = ($a =~ m#include/#);
+     $j = ($b =~ m#include/#);
+     return $j - $i if $i != $j;
+     if ((($i = $a) =~ s#/+[^/]*$##)
+       && (($j = $b) =~ s#/+[^/]*$##)) {
+           return $i cmp $j if $i ne $j;
+     }
+     $i = ($a =~ m#\.h$#);
+     $j = ($b =~ m#\.h$#);
+     return $j - $i if $i != $j;
+     return $a cmp $b;
+ }
diff --cc README.threads
index 0000000,4d20243..12abbe5
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,171 +1,181 @@@
 -If you want to build with multi-threading support and you are
 -running Linux 2.x (with the LinuxThreads library installed:
 -that's the linuxthreads and linuxthreads-devel RPMs for RedHat)
 -or Digital UNIX 4.x or Solaris 2.x for recentish x (2.5 is OK)
 -then you should be able to use
 -    ./Configure -Dusethreads -Doptimize=-g -ders
 -    make
 -and ignore the rest of this "Building" section. If it doesn't
 -work or you are using another platform which you believe supports
 -POSIX.1c threads then read on.
 -
+ Building
 -    Add -lpthread -lc_r to lddlflags
+ Omit the -e from your ./Configure arguments. For example, use
+     ./Configure -drs
+ When it offers to let you change config.sh, do so. If you already
+ have a config.sh then you can edit it and do
+     ./Configure -S
+ to propagate the required changes.
+ In ccflags, insert -DUSE_THREADS (and probably -DDEBUGGING since
+ that's what I've been building with). Also insert any other
+ arguments in there that your compiler needs to use POSIX threads.
+ Change optimize to -g to give you better debugging information.
+ Include any necessary explicit libraries in libs and change
+ ldflags if you need any linker flags instead or as well.
+ More explicitly, for Linux (when using the standard kernel-threads
+ based LinuxThreads library):
+     Add -DUSE_THREADS -D_REENTRANT -DDEBUGGING to ccflags and cppflags
+     Add -lpthread to libs
+     Change optimize to -g
+ For Digital Unix 4.x:
+     Add -pthread -DUSE_THREADS -DDEBUGGING to ccflags
+     Add -DUSE_THREADS -DDEBUGGING to cppflags
+     Add -pthread to ldflags
+     Change optimize to -g
 -For Solaris, do the same as for Linux above.
++    Maybe add -lpthread -lc_r to lddlflags
+     For some reason, the extra includes for pthreads make Digital UNIX
+     complain fatally about the sbrk() delcaration in perl's malloc.c
+     so use the native malloc as follows:
+     Change usemymalloc to n
+     Zap mallocobj and mallocsrc (foo='')
+     Change d_mymalloc to undef
 -Now you can do a
 -    make
 -    perl -Mblib queue.t
++Now you can do a
++    make perl
++For Digital UNIX, it will get as far as building miniperl and then
++bomb out buidling DynaLoader when MakeMaker tries to find where
++perl is. This seems to be a problem with backticks/system when
++threading is in. A minimal failing example is
++    perl -e 'eval q($foo = 0); system("echo foo")'
++which doesn't echo anything. The resulting ext/DynaLoader/Makefile
++will have lines
++    PERL = 0
++    FULLPERL = 0
++Change them to be the pathnames of miniperl and perl respectively
++(the ones in your perl build directory). The resume the make with
++    make perl
++This time it should manage to build perl. If not, try some cutting
++and pasting to compile and link things manually. Be careful when
++building extensions that your ordinary perl doesn't end up making
++a Makefile without the correct pthreads compiler options.
+ Building the Thread extension
+ Build it away from the perl tree in the usual way. Set your PATH
+ environment variable to have your perl build directory first and
+ set PERL5LIB to be /your/perl/build/directory/lib (without those,
+ I had problems where the config information from the ordinary perl
+ on the system would end up in the Makefile). Then
+     perl Makefile.PL PERL_SRC=/your/perl/build/directory
+     make
++On Digital UNIX, you'll probably have to fix the "PERL = 0" and
++"FULLPERL = 0" lines in the generated Makefile as for DynaLoader.
+ Then you can try some of the tests with
+     perl -Mblib create.t
+     perl -Mblib join.t
+     perl -Mblib lock.t
+     perl -Mblib unsync.t
+     perl -Mblib unsync2.t
+     perl -Mblib unsync3.t
+     perl -Mblib io.t
 -may or may not work. Under Linux, many tests may appear to fail
+ The io one leaves a thread reading from the keyboard on stdin so
+ as the ping messages appear you can type lines and see them echoed.
+ Try running the main perl test suite too. There are known
+ failures for po/misc test 45 (tries to do local(@_) but @_ is
+ now lexical) and some tests involving backticks/system/fork
 -2 October 1997
++may or may not work. Under Linux, many tests appear to fail
+ when run under the test harness but work fine when invoked
+ manually.
+ Bugs
++* Thread states (DETACHED, JOINED etc.) and perl's idea of what's
++  in scope and out of scope aren't properly integrated. Expect
++  segaults and hangs when thread objects whose threads have ended
++  go out of scope (e.g. at program exit).
++
+ * cond.t hasn't been redone since condition variable changed.
+ * FAKE_THREADS should produce a working perl but the Thread
+ extension won't build with it yet.
+ * There's a known memory leak (curstack isn't freed at the end
+ of each thread because it causes refcount problems that I
+ haven't tracked down yet) and there are very probably others too.
+ * There are still races where bugs show up under contention.
+ * Need to document "lock", Thread.pm, Queue.pm, ...
+ * Plenty of others
+ Debugging
+ Use the -DL command-line option to turn on debugging of the
+ multi-threading code. Under Linux, that also turns on a quick
+ hack I did to grab a bit of extra information from segfaults.
+ If you have a fancier gdb/threads setup than I do then you'll
+ have to delete the lines in perl.c which say
+     #if defined(DEBUGGING) && defined(USE_THREADS) && defined(__linux__)
+         DEBUG_L(signal(SIGSEGV, (void(*)(int))catch_sigsegv););
+     #endif
+ Background
+ Some old globals (e.g. stack_sp, op) and some old per-interpreter
+ variables (e.g. tmps_stack, cxstack) move into struct thread.
+ All fields of struct thread (apart from a few only applicable to
+ FAKE_THREADS) are of the form Tfoo. For example, stack_sp becomes
+ the field Tstack_sp of struct thread. For those fields which moved
+ from original perl, thread.h does
+     #define foo (thr->Tfoo)
+ This means that all functions in perl which need to use one of these
+ fields need an (automatic) variable thr which points at the current
+ thread's struct thread. For pp_foo functions, it is passed around as
+ an argument, for other functions they do
+     dTHR;
+ which declares and initialises thr from thread-specific data
+ via pthread_getspecific. If a function fails to compile with an
+ error about "no such variable thr", it probably just needs a dTHR
+ at the top.
+ Fake threads
+ For FAKE_THREADS, thr is a global variable and perl schedules threads
+ by altering thr in between appropriate ops. The next and prev fields
+ of struct thread keep all fake threads on a doubly linked list and
+ the next_run and prev_run fields keep all runnable threads on a
+ doubly linked list. Mutexes are stubs for FAKE_THREADS. Condition
+ variables are implemented as a list of waiting threads.
+ Mutexes and condition variables
+ The API is via macros MUTEX_{INIT,LOCK,UNLOCK,DESTROY} and
+ COND_{INIT,WAIT,SIGNAL,BROADCAST,DESTROY}. For POSIX threads,
+ perl mutexes and condition variables correspond to POSIX ones.
+ For FAKE_THREADS, mutexes are stubs and condition variables are
+ implmented as lists of waiting threads. For FAKE_THREADS, a thread
+ waits on a condition variable by removing itself from the runnable
+ list, calling SCHEDULE to change thr to the next appropriate
+ runnable thread and returning op (i.e. the new threads next op).
+ This means that fake threads can only block while in PP code.
+ A PP function which contains a COND_WAIT must be prepared to
+ handle such restarts and can use the field "private" of struct
+ thread to record its state. For fake threads, COND_SIGNAL and
+ COND_BROADCAST work by putting back all the threads on the
+ condition variables list into the run queue. Note that a mutex
+ must *not* be held while returning from a PP function.
+ Perl locks are a condpair_t structure (a triple of a mutex, a
+ condtion variable and an owner thread field) attached by 'm'
+ magic to any SV. pp_lock locks such an object by waiting on the
+ condition variable until the owner field is zero and then setting
+ the owner field to its own thread pointer. The lock is recursive
+ so if the owner field already matches the current thread then
+ pp_lock returns straight away. If the owner field has to be filled
+ in then unlock_condpair is queued as an end-of-block destructor and
+ that function zeroes out the owner field, releasing the lock.
+ Malcolm Beattie
+ mbeattie@sable.ox.ac.uk
++9 September 1997
diff --cc win32/config.bc
index 0000000,ad76309..4b148de
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,498 +1,498 @@@
 -cat='type'
+ #
+ ## This file was hand coded and a lot of information is invalid
+ #
+ ## Configured by: ~cf_email~
+ ## Target system: WIN32 
+ #
+ archlibexp='~INST_TOP~\lib'
+ archname='MSWin32'
+ cc='bcc32'
+ ccflags='-DWIN32'
+ cppflags='-DWIN32'
+ dlsrc='dl_win32.xs'
+ dynamic_ext='Fcntl IO Opcode SDBM_File Socket'
+ extensions='Fcntl IO Opcode SDBM_File Socket'
+ installarchlib='~INST_TOP~\lib'
+ installprivlib='~INST_TOP~\lib'
+ libpth=''
+ libs=''
+ osname='MSWin32'
+ osvers='4.0'
+ prefix='~INST_DRV~'
+ privlibexp='~INST_TOP~\lib'
+ sharpbang='#!'
+ shsharp='true'
+ sig_name='ZERO HUP INT QUIT ILL TRAP ABRT EMT FPE KILL BUS SEGV SYS PIPE ALRM TERM USR1 USR2 CHLD PWR WINCH URG IO STOP TSTP CONT TTIN TTOU VTALRM PROF XCPU XFSZ WAITING LWP FREEZE THAW RTMIN NUM37 NUM38 NUM39 NUM40 NUM41 NUM42 RTMAX IOT CLD POLL'
+ so='dll'
+ startsh='#!/bin/sh'
+ static_ext=' '
+ Author=''
+ CONFIG='true'
+ Date='$Date'
+ Header=''
+ Id='$Id'
+ Locker=''
+ Log='$Log'
+ Mcc='Mcc'
+ PATCHLEVEL='~PATCHLEVEL~'
+ POSIX_cflags='ccflags="$ccflags -DSTRUCT_TM_HASZONE"'
+ RCSfile='$RCSfile'
+ Revision='$Revision'
+ SUBVERSION='~SUBVERSION~'
+ Source=''
+ State=''
+ afs='false'
+ alignbytes='8'
+ aphostname=''
+ ar='tlib /P128'
+ archlib='~INST_TOP~\lib'
+ archobjs=''
+ awk='awk'
+ baserev='5.0'
+ bash=''
+ bin='~INST_TOP~\bin'
+ binexp='~INST_TOP~\bin'
+ bison=''
+ byacc='byacc'
+ byteorder='1234'
+ c=''
+ castflags='0'
 -comm=''
++cat='cat'
+ cccdlflags=''
+ ccdlflags=' '
+ cf_by='garyng'
+ cf_email='71564.1743@compuserve.com'
+ cf_time='Thu Apr 11 06:20:49 PDT 1996'
+ chgrp=''
+ chmod=''
+ chown=''
+ clocktype='clock_t'
 -cp='copy'
++comm='comm'
+ compress=''
+ contains='grep'
 -d_Gconvert='gcvt((x),(n),(b))'
++cp='cp'
+ cpio=''
+ cpp='cpp32'
+ cpp_stuff='42'
+ cpplast=''
+ cppminus=''
+ cpprun=''
+ cppstdin=''
+ cryptlib=''
+ csh='undef'
 -lns='copy'
++d_Gconvert='sprintf((b),"%.*g",(n),(x))'
+ d_access='define'
+ d_alarm='undef'
+ d_archlib='define'
+ d_attribut='undef'
+ d_bcmp='undef'
+ d_bcopy='undef'
+ d_bincompat3='undef'
+ d_bsd='define'
+ d_bsdgetpgrp='undef'
+ d_bsdpgrp='undef'
+ d_bsdsetpgrp='undef'
+ d_bzero='undef'
+ d_casti32='define'
+ d_castneg='define'
+ d_charvspr='undef'
+ d_chown='undef'
+ d_chroot='undef'
+ d_chsize='define'
+ d_closedir='define'
+ d_const='define'
+ d_crypt='undef'
+ d_csh='undef'
+ d_cuserid='undef'
+ d_dbl_dig='define'
+ d_difftime='define'
+ d_dirnamlen='define'
+ d_dlerror='define'
+ d_dlopen='define'
+ d_dlsymun='undef'
+ d_dosuid='undef'
+ d_dup2='define'
+ d_eofnblk='define'
+ d_eunice='undef'
+ d_fchmod='undef'
+ d_fchown='undef'
+ d_fcntl='undef'
+ d_fd_macros='define'
+ d_fd_set='define'
+ d_fds_bits='define'
+ d_fgetpos='define'
+ d_flexfnam='define'
+ d_flock='define'
+ d_fork='undef'
+ d_fpathconf='undef'
+ d_fsetpos='define'
+ d_getgrps='undef'
+ d_setgrps='undef'
+ d_gethent='undef'
+ d_gethname='undef'
+ d_getlogin='undef'
+ d_getpgrp2='undef'
+ d_getpgrp='undef'
+ d_getpgid='undef'
+ d_getppid='undef'
+ d_getprior='undef'
+ d_gettimeod='undef'
+ d_htonl='define'
+ d_index='undef'
+ d_inetaton='undef'
+ d_isascii='define'
+ d_killpg='undef'
+ d_link='undef'
+ d_locconv='define'
+ d_lockf='undef'
+ d_lstat='undef'
+ d_mblen='define'
+ d_mbstowcs='define'
+ d_mbtowc='define'
+ d_memcmp='define'
+ d_memcpy='define'
+ d_memmove='define'
+ d_memset='define'
+ d_mkdir='define'
+ d_mkfifo='undef'
+ d_mktime='define'
+ d_msg='undef'
+ d_msgctl='define'
+ d_msgget='define'
+ d_msgrcv='define'
+ d_msgsnd='define'
+ d_mymalloc='undef'
+ d_nice='undef'
+ d_oldarchlib='undef'
+ d_oldsock='undef'
+ d_open3='undef'
+ d_pathconf='undef'
+ d_pause='define'
+ d_phostname='undef'
+ d_pipe='define'
+ d_poll='undef'
+ d_portable='define'
+ d_pwage='undef'
+ d_pwchange='undef'
+ d_pwclass='undef'
+ d_pwcomment='undef'
+ d_pwexpire='undef'
+ d_pwquota='undef'
+ d_readdir='define'
+ d_readlink='undef'
+ d_rename='define'
+ d_rewinddir='define'
+ d_rmdir='define'
+ d_safebcpy='undef'
+ d_safemcpy='undef'
+ d_sanemcmp='define'
+ d_seekdir='define'
+ d_select='define'
+ d_sem='undef'
+ d_semctl='define'
+ d_semget='define'
+ d_semop='define'
+ d_setegid='undef'
+ d_seteuid='undef'
+ d_setlinebuf='undef'
+ d_setlocale='define'
+ d_setpgid='undef'
+ d_setpgrp2='undef'
+ d_setpgrp='undef'
+ d_setprior='undef'
+ d_setregid='undef'
+ d_setresgid='undef'
+ d_setresuid='undef'
+ d_setreuid='undef'
+ d_setrgid='undef'
+ d_setruid='undef'
+ d_setsid='undef'
+ d_sfio='undef'
+ d_shm='undef'
+ d_shmat='undef'
+ d_shmatprototype='undef'
+ d_shmctl='define'
+ d_shmdt='define'
+ d_shmget='define'
+ d_shrplib='undef'
+ d_sigaction='undef'
+ d_sigintrp=''
+ d_sigsetjmp='undef'
+ d_sigvec='define'
+ d_sigvectr='undef'
+ d_socket='define'
+ d_sockpair='undef'
+ d_statblks='undef'
+ d_stdio_cnt_lval='define'
+ d_stdio_ptr_lval='define'
+ d_stdiobase='define'
+ d_stdstdio='define'
+ d_strchr='define'
+ d_strcoll='define'
+ d_strctcpy='define'
+ d_strerrm='strerror(e)'
+ d_strerror='define'
+ d_strtod='define'
+ d_strtol='define'
+ d_strtoul='define'
+ d_strxfrm='define'
+ d_suidsafe='undef'
+ d_symlink='undef'
+ d_syscall='undef'
+ d_sysconf='undef'
+ d_sysernlst=''
+ d_syserrlst='define'
+ d_system='define'
+ d_tcgetpgrp='undef'
+ d_tcsetpgrp='undef'
+ d_telldir='define'
+ d_time='define'
+ d_times='define'
+ d_truncate='undef'
+ d_tzname='define'
+ d_umask='define'
+ d_uname='undef'
+ d_vfork='undef'
+ d_void_closedir='undef'
+ d_voidsig='define'
+ d_voidtty=''
+ d_volatile='define'
+ d_vprintf='define'
+ d_wait4='undef'
+ d_waitpid='undef'
+ d_wcstombs='define'
+ d_wctomb='define'
+ d_xenix='undef'
+ date='date'
+ db_hashtype='int'
+ db_prefixtype='int'
+ defvoidused='15'
+ direntrytype='struct direct'
+ dlext='dll'
+ eagain='EAGAIN'
+ echo='echo'
+ egrep='egrep'
+ emacs=''
+ eunicefix=':'
+ exe_ext='.exe'
+ expr='expr'
+ find='find'
+ firstmakefile='makefile'
+ flex=''
+ fpostype='fpos_t'
+ freetype='void'
+ full_csh=''
+ full_sed=''
+ gcc=''
+ gccversion=''
+ gidtype='gid_t'
+ glibpth='/usr/shlib  /lib/pa1.1 /usr/lib/large /lib /usr/lib /usr/lib/386 /lib/386 /lib/large /usr/lib/small /lib/small /usr/ccs/lib /usr/ucblib /usr/shlib '
+ grep='grep'
+ groupcat=''
+ groupstype='gid_t'
+ h_fcntl='false'
+ h_sysfile='true'
+ hint='recommended'
+ hostcat='ypcat hosts'
+ huge=''
+ i_bsdioctl=''
+ i_db='undef'
+ i_dbm='undef'
+ i_dirent='define'
+ i_dld='undef'
+ i_dlfcn='define'
+ i_fcntl='define'
+ i_float='define'
+ i_gdbm='define'
+ i_grp='define'
+ i_limits='define'
+ i_locale='define'
+ i_malloc='define'
+ i_math='define'
+ i_memory='undef'
+ i_ndbm='undef'
+ i_neterrno='undef'
+ i_niin='undef'
+ i_pwd='undef'
+ i_rpcsvcdbm='define'
+ i_sfio='undef'
+ i_sgtty='undef'
+ i_stdarg='define'
+ i_stddef='define'
+ i_stdlib='define'
+ i_string='define'
+ i_sysdir='undef'
+ i_sysfile='undef'
+ i_sysfilio='define'
+ i_sysin='undef'
+ i_sysioctl='undef'
+ i_sysndir='undef'
+ i_sysparam='undef'
+ i_sysresrc='undef'
+ i_sysselct='undef'
+ i_syssockio=''
+ i_sysstat='define'
+ i_systime='undef'
+ i_systimek='undef'
+ i_systimes='undef'
+ i_systypes='define'
+ i_sysun='undef'
+ i_syswait='undef'
+ i_termio='undef'
+ i_termios='undef'
+ i_time='define'
+ i_unistd='undef'
+ i_utime='define'
+ i_values='undef'
+ i_varargs='undef'
+ i_varhdr='varargs.h'
+ i_vfork='undef'
+ incpath=''
+ inews=''
+ installbin='~INST_TOP~\bin'
+ installman1dir='~INST_TOP~\man\man1'
+ installman3dir='~INST_TOP~\man\man3'
+ installscript='~INST_TOP~\bin'
+ installsitearch='~INST_TOP~\lib\site'
+ installsitelib='~INST_TOP~\lib\site'
+ intsize='4'
+ known_extensions='DB_File Fcntl GDBM_File NDBM_File ODBM_File Opcode POSIX SDBM_File Socket'
+ ksh=''
+ large=''
+ ld='tlink32'
+ lddlflags='-Tpd'
+ ldflags=''
+ less='less'
+ lib_ext='.lib'
+ libc='cw32mti.lib'
+ libswanted='net socket inet nsl nm ndbm gdbm dbm db malloc dl dld ld sun m c cposix posix ndir dir crypt ucb bsd BSD PW x'
+ line='line'
+ lint=''
+ lkflags=''
+ ln=''
 -ls='dir'
++lns=''
+ locincpth='/usr/local/include /opt/local/include /usr/gnu/include /opt/gnu/include /usr/GNU/include /opt/GNU/include'
+ loclibpth='/usr/local/lib /opt/local/lib /usr/gnu/lib /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib'
+ longsize='4'
+ lp=''
+ lpr=''
 -pg=''
++ls='ls'
+ lseektype='off_t'
+ mail=''
+ mailx=''
+ make='dmake'
+ mallocobj='malloc.o'
+ mallocsrc='malloc.c'
+ malloctype='void *'
+ man1dir='~INST_TOP~\man\man1'
+ man1direxp='~INST_TOP~\man\man1'
+ man1ext='1'
+ man3dir='~INST_TOP~\man\man3'
+ man3direxp='~INST_TOP~\man\man3'
+ man3ext='3'
+ medium=''
+ mips=''
+ mips_type=''
+ mkdir='mkdir'
+ models='none'
+ modetype='mode_t'
+ more='more /e'
+ mv=''
+ myarchname='MSWin32'
+ mydomain=''
+ myhostname=''
+ myuname=''
+ n='-n'
+ nm_opt=''
+ nm_so_opt=''
+ nroff=''
+ o_nonblock='O_NONBLOCK'
+ obj_ext='.obj'
+ oldarchlib=''
+ oldarchlibexp=''
+ optimize='-O'
+ orderlib='false'
+ package='perl5'
+ pager='more /e'
+ passcat=''
+ patchlevel='2'
+ path_sep=';'
+ perl='perl'
+ perladmin=''
+ perlpath='~INST_TOP~\bin\perl.exe'
 -rm='del'
++pg='pg'
+ phostname='hostname'
+ plibpth=''
+ pmake=''
+ pr=''
+ prefixexp='~INST_DRV~'
+ privlib='~INST_TOP~\lib'
+ prototype='define'
+ randbits='15'
+ ranlib=''
+ rd_nodata='-1'
 -spitshell=''
++rm='rm'
+ rmail=''
+ runnm='true'
+ scriptdir='~INST_TOP~\bin'
+ scriptdirexp='~INST_TOP~\bin'
+ sed='sed'
+ selecttype='int *'
+ sendmail='blat'
+ sh='cmd /x /c'
+ shar=''
+ shmattype='void *'
+ shortsize='2'
+ shrpdir='none'
+ sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 6 18 22'
+ signal_t='void'
+ sitearch='~INST_TOP~\lib\site'
+ sitearchexp='~INST_TOP~\lib\site'
+ sitelib='~INST_TOP~\lib\site'
+ sitelibexp='~INST_TOP~\lib\site'
+ sizetype='size_t'
+ sleep=''
+ smail=''
+ small=''
+ sockethdr=''
+ socketlib=''
+ sort='sort'
+ spackage='Perl5'
 -test=''
++spitshell='cat'
+ split=''
+ ssizetype='int'
+ startperl='#perl'
+ stdchar='unsigned char'
+ stdio_base='((fp)->buffer)'
+ stdio_bufsiz='((fp)->level + (fp)->curp - (fp)->buffer)'
+ stdio_cnt='((fp)->level)'
+ stdio_ptr='((fp)->curp)'
+ strings='/usr/include/string.h'
+ submit=''
+ sysman='/usr/man/man1'
+ tail=''
+ tar=''
+ tbl=''
 -tr=''
++test='test'
+ timeincl='/usr/include/sys/time.h '
+ timetype='time_t'
+ touch='touch'
++tr='tr'
+ troff=''
+ uidtype='uid_t'
+ uname='uname'
+ uniq='uniq'
+ usedl='define'
+ usemymalloc='n'
+ usenm='false'
+ useperlio='undef'
+ useposix='true'
+ usesafe='true'
+ usevfork='false'
+ usrinc='/usr/include'
+ uuname=''
+ vi=''
+ voidflags='15'
+ xlibpth='/usr/lib/386 /lib/386'
+ zcat=''
diff --cc win32/config.vc
Simple merge
index 0000000,1883e97..5976289
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,1798 +1,1798 @@@
 -#define Gconvert(x,n,t,b) gcvt((x),(n),(b))
+ /*
+  * This file was produced by running the config_h.SH script, which
+  * gets its values from config.sh, which is generally produced by
+  * running Configure.
+  *
+  * Feel free to modify any of this as the need arises.  Note, however,
+  * that running config_h.SH again will wipe out any changes you've made.
+  * For a more permanent change edit config.sh and rerun config_h.SH.
+  *
+  * $Id: Config_h.U,v 3.0.1.4 1995/09/25 09:10:49 ram Exp $
+  */
+ /* Configuration time: Thu Apr 11 06:20:49 PDT 1996
+  * Configured by: garyng
+  * Target system: 
+  */
+ #ifndef _config_h_
+ #define _config_h_
+ /* MEM_ALIGNBYTES:
+  *    This symbol contains the number of bytes required to align a
+  *    double. Usual values are 2, 4 and 8.
+  *    On NeXT starting with 3.2, you can build "Fat" Multiple Architecture
+  *    Binaries (MAB) for targets with varying alignment.  This only matters
+  *    for perl, where the config.h can be generated and installed on one
+  *    system, and used by a different architecture to build an extension.
+  *    The default is eight, for safety.
+  */
+ #ifndef NeXT
+ #define MEM_ALIGNBYTES 8      /**/
+ #else  /* NeXT */
+ #ifdef __m68k__
+ #define MEM_ALIGNBYTES 2
+ #else
+ #ifdef __i386__
+ #define MEM_ALIGNBYTES 4
+ #else /* __hppa__, __sparc__ and default for unknown architectures */
+ #define MEM_ALIGNBYTES 8
+ #endif /* __i386__ */
+ #endif /* __m68k__ */
+ #endif /* NeXT */
+ /* ARCHNAME:
+  *    This symbol holds a string representing the architecture name.
+  *    It may be used to construct an architecture-dependant pathname
+  *    where library files may be held under a private library, for
+  *    instance.
+  */
+ #define ARCHNAME "MSWin32"            /**/
+ /* BIN:
+  *    This symbol holds the path of the bin directory where the package will
+  *    be installed. Program must be prepared to deal with ~name substitution.
+  */
+ /* BIN_EXP:
+  *    This symbol is the filename expanded version of the BIN symbol, for
+  *    programs that do not want to deal with that at run-time.
+  */
+ #define BIN "c:\\perl\\bin"   /**/
+ #define BIN_EXP "c:\\perl\\bin"       /**/
+ /* CAT2:
+  *    This macro catenates 2 tokens together.
+  */
+ /* STRINGIFY:
+  *    This macro surrounds its token with double quotes.
+  */
+ #if 42 == 1
+ #define CAT2(a,b)a/**/b
+ #define CAT3(a,b,c)a/**/b/**/c
+ #define CAT4(a,b,c,d)a/**/b/**/c/**/d
+ #define CAT5(a,b,c,d,e)a/**/b/**/c/**/d/**/e
+ #define STRINGIFY(a)"a"
+               /* If you can get stringification with catify, tell me how! */
+ #endif
+ #if 42 == 42
+ #define CAT2(a,b)a ## b
+ #define CAT3(a,b,c)a ## b ## c
+ #define CAT4(a,b,c,d)a ## b ## c ## d
+ #define CAT5(a,b,c,d,e)a ## b ## c ## d ## e
+ #define StGiFy(a)# a
+ #define STRINGIFY(a)StGiFy(a)
+ #define SCAT2(a,b)StGiFy(a) StGiFy(b)
+ #define SCAT3(a,b,c)StGiFy(a) StGiFy(b) StGiFy(c)
+ #define SCAT4(a,b,c,d)StGiFy(a) StGiFy(b) StGiFy(c) StGiFy(d)
+ #define SCAT5(a,b,c,d,e)StGiFy(a) StGiFy(b) StGiFy(c) StGiFy(d) StGiFy(e)
+ #endif
+ #ifndef CAT2
+ #include "Bletch: How does this C preprocessor catenate tokens?"
+ #endif
+ /* CPPSTDIN:
+  *    This symbol contains the first part of the string which will invoke
+  *    the C preprocessor on the standard input and produce to standard
+  *    output.  Typical value of "cc -E" or "/lib/cpp", but it can also
+  *    call a wrapper. See CPPRUN.
+  */
+ /* CPPMINUS:
+  *    This symbol contains the second part of the string which will invoke
+  *    the C preprocessor on the standard input and produce to standard
+  *    output.  This symbol will have the value "-" if CPPSTDIN needs a minus
+  *    to specify standard input, otherwise the value is "".
+  */
+ #define CPPSTDIN ""
+ #define CPPMINUS ""
+ /* HAS_ALARM:
+  *    This symbol, if defined, indicates that the alarm routine is
+  *    available.
+  */
+ /*#define HAS_ALARM           /**/
+ /* HASATTRIBUTE:
+  *    This symbol indicates the C compiler can check for function attributes,
+  *    such as printf formats. This is normally only supported by GNU cc.
+  */
+ /*#define HASATTRIBUTE        /**/
+ #ifndef HASATTRIBUTE
+ #define __attribute__(_arg_)
+ #endif
+ /* HAS_BCMP:
+  *    This symbol is defined if the bcmp() routine is available to
+  *    compare blocks of memory.
+  */
+ /*#define HAS_BCMP    /**/
+ /* HAS_BCOPY:
+  *    This symbol is defined if the bcopy() routine is available to
+  *    copy blocks of memory.
+  */
+ /*#define HAS_BCOPY   /**/
+ /* HAS_BZERO:
+  *    This symbol is defined if the bzero() routine is available to
+  *    set a memory block to 0.
+  */
+ /*#define HAS_BZERO   /**/
+ /* CASTI32:
+  *    This symbol is defined if the C compiler can cast negative
+  *    or large floating point numbers to 32-bit ints.
+  */
+ #define       CASTI32         /**/
+ /* CASTNEGFLOAT:
+  *    This symbol is defined if the C compiler can cast negative
+  *    numbers to unsigned longs, ints and shorts.
+  */
+ /* CASTFLAGS:
+  *    This symbol contains flags that say what difficulties the compiler
+  *    has casting odd floating values to unsigned long:
+  *            0 = ok
+  *            1 = couldn't cast < 0
+  *            2 = couldn't cast >= 0x80000000
+  *            4 = couldn't cast in argument expression list
+  */
+ #define       CASTNEGFLOAT            /**/
+ #define CASTFLAGS 0           /**/
+ /* HAS_CHOWN:
+  *    This symbol, if defined, indicates that the chown routine is
+  *    available.
+  */
+ /*#define HAS_CHOWN           /**/
+ /* HAS_CHROOT:
+  *    This symbol, if defined, indicates that the chroot routine is
+  *    available.
+  */
+ /*#define HAS_CHROOT          /**/
+ /* HAS_CHSIZE:
+  *    This symbol, if defined, indicates that the chsize routine is available
+  *    to truncate files.  You might need a -lx to get this routine.
+  */
+ #define       HAS_CHSIZE              /**/
+ /* VOID_CLOSEDIR:
+  *    This symbol, if defined, indicates that the closedir() routine
+  *    does not return a value.
+  */
+ /*#define VOID_CLOSEDIR               /**/
+ /* HASCONST:
+  *    This symbol, if defined, indicates that this C compiler knows about
+  *    the const type. There is no need to actually test for that symbol
+  *    within your programs. The mere use of the "const" keyword will
+  *    trigger the necessary tests.
+  */
+ #define HASCONST      /**/
+ #ifndef HASCONST
+ #define const
+ #endif
+ /* HAS_CRYPT:
+  *    This symbol, if defined, indicates that the crypt routine is available
+  *    to encrypt passwords and the like.
+  */
+ /*#define HAS_CRYPT           /**/
+ /* HAS_CUSERID:
+  *    This symbol, if defined, indicates that the cuserid routine is
+  *    available to get character login names.
+  */
+ /*#define HAS_CUSERID         /**/
+ /* HAS_DBL_DIG:
+  *    This symbol, if defined, indicates that this system's <float.h>
+  *    or <limits.h> defines the symbol DBL_DIG, which is the number
+  *    of significant digits in a double precision number.  If this
+  *    symbol is not defined, a guess of 15 is usually pretty good.
+  */
+ #define HAS_DBL_DIG   /**/
+ /* HAS_DIFFTIME:
+  *    This symbol, if defined, indicates that the difftime routine is
+  *    available.
+  */
+ #define HAS_DIFFTIME          /**/
+ /* HAS_DLERROR:
+  *    This symbol, if defined, indicates that the dlerror routine is
+  *    available to return a string describing the last error that
+  *    occurred from a call to dlopen(), dlclose() or dlsym().
+  */
+ #define HAS_DLERROR   /**/
+ /* HAS_DUP2:
+  *    This symbol, if defined, indicates that the dup2 routine is
+  *    available to duplicate file descriptors.
+  */
+ #define HAS_DUP2      /**/
+ /* HAS_FCHMOD:
+  *    This symbol, if defined, indicates that the fchmod routine is available
+  *    to change mode of opened files.  If unavailable, use chmod().
+  */
+ /*#define HAS_FCHMOD          /**/
+ /* HAS_FCHOWN:
+  *    This symbol, if defined, indicates that the fchown routine is available
+  *    to change ownership of opened files.  If unavailable, use chown().
+  */
+ /*#define HAS_FCHOWN          /**/
+ /* HAS_FCNTL:
+  *    This symbol, if defined, indicates to the C program that
+  *    the fcntl() function exists.
+  */
+ /*#define HAS_FCNTL           /**/
+ /* HAS_FGETPOS:
+  *    This symbol, if defined, indicates that the fgetpos routine is
+  *    available to get the file position indicator, similar to ftell().
+  */
+ #define HAS_FGETPOS   /**/
+ /* FLEXFILENAMES:
+  *    This symbol, if defined, indicates that the system supports filenames
+  *    longer than 14 characters.
+  */
+ #define       FLEXFILENAMES           /**/
+ /* HAS_FLOCK:
+  *    This symbol, if defined, indicates that the flock routine is
+  *    available to do file locking.
+  */
+ #define HAS_FLOCK             /**/
+ /* HAS_FORK:
+  *    This symbol, if defined, indicates that the fork routine is
+  *    available.
+  */
+ /*#define HAS_FORK            /**/
+ /* HAS_FSETPOS:
+  *    This symbol, if defined, indicates that the fsetpos routine is
+  *    available to set the file position indicator, similar to fseek().
+  */
+ #define HAS_FSETPOS   /**/
+ /* HAS_GETTIMEOFDAY:
+  *    This symbol, if defined, indicates that the gettimeofday() system
+  *    call is available for a sub-second accuracy clock. Usually, the file
+  *    <sys/resource.h> needs to be included (see I_SYS_RESOURCE).
+  *    The type "Timeval" should be used to refer to "struct timeval".
+  */
+ /*#define HAS_GETTIMEOFDAY    /**/
+ #ifdef HAS_GETTIMEOFDAY
+ #define Timeval struct timeval        /* Structure used by gettimeofday() */
+ #endif
+ /* HAS_GETGROUPS:
+  *    This symbol, if defined, indicates that the getgroups() routine is
+  *    available to get the list of process groups.  If unavailable, multiple
+  *    groups are probably not supported.
+  */
+ /* HAS_SETGROUPS:
+  *    This symbol, if defined, indicates that the setgroups() routine is
+  *    available to set the list of process groups.  If unavailable, multiple
+  *    groups are probably not supported.
+  */
+ /*#define HAS_GETGROUPS               /**/
+ /*#define HAS_SETGROUPS               /**/
+ /* HAS_GETHOSTENT:
+  *    This symbol, if defined, indicates that the gethostent routine is
+  *    available to lookup host names in some data base or other.
+  */
+ /*#define HAS_GETHOSTENT              /**/
+ /* HAS_UNAME:
+  *    This symbol, if defined, indicates that the C program may use the
+  *    uname() routine to derive the host name.  See also HAS_GETHOSTNAME
+  *    and PHOSTNAME.
+  */
+ /*#define HAS_UNAME           /**/
+ /* HAS_GETLOGIN:
+  *    This symbol, if defined, indicates that the getlogin routine is
+  *    available to get the login name.
+  */
+ /*#define HAS_GETLOGIN                /**/
+ /* HAS_GETPGRP2:
+  *    This symbol, if defined, indicates that the getpgrp2() (as in DG/UX)
+  *    routine is available to get the current process group.
+  */
+ /*#define HAS_GETPGRP2                /**/
+ /* HAS_GETPPID:
+  *    This symbol, if defined, indicates that the getppid routine is
+  *    available to get the parent process ID.
+  */
+ /*#define HAS_GETPPID         /**/
+ /* HAS_GETPRIORITY:
+  *    This symbol, if defined, indicates that the getpriority routine is
+  *    available to get a process's priority.
+  */
+ /*#define HAS_GETPRIORITY             /**/
+ /* HAS_HTONL:
+  *    This symbol, if defined, indicates that the htonl() routine (and
+  *    friends htons() ntohl() ntohs()) are available to do network
+  *    order byte swapping.
+  */
+ /* HAS_HTONS:
+  *    This symbol, if defined, indicates that the htons() routine (and
+  *    friends htonl() ntohl() ntohs()) are available to do network
+  *    order byte swapping.
+  */
+ /* HAS_NTOHL:
+  *    This symbol, if defined, indicates that the ntohl() routine (and
+  *    friends htonl() htons() ntohs()) are available to do network
+  *    order byte swapping.
+  */
+ /* HAS_NTOHS:
+  *    This symbol, if defined, indicates that the ntohs() routine (and
+  *    friends htonl() htons() ntohl()) are available to do network
+  *    order byte swapping.
+  */
+ #define HAS_HTONL             /**/
+ #define HAS_HTONS             /**/
+ #define HAS_NTOHL             /**/
+ #define HAS_NTOHS             /**/
+ /* HAS_ISASCII:
+  *    This manifest constant lets the C program know that isascii 
+  *    is available.
+  */
+ #define HAS_ISASCII           /**/
+ /* HAS_KILLPG:
+  *    This symbol, if defined, indicates that the killpg routine is available
+  *    to kill process groups.  If unavailable, you probably should use kill
+  *    with a negative process number.
+  */
+ /*#define HAS_KILLPG  /**/
+ /* HAS_LINK:
+  *    This symbol, if defined, indicates that the link routine is
+  *    available to create hard links.
+  */
+ /*#define HAS_LINK    /**/
+ /* HAS_LOCALECONV:
+  *    This symbol, if defined, indicates that the localeconv routine is
+  *    available for numeric and monetary formatting conventions.
+  */
+ #define HAS_LOCALECONV        /**/
+ /* HAS_LOCKF:
+  *    This symbol, if defined, indicates that the lockf routine is
+  *    available to do file locking.
+  */
+ /*#define HAS_LOCKF           /**/
+ /* HAS_LSTAT:
+  *    This symbol, if defined, indicates that the lstat routine is
+  *    available to do file stats on symbolic links.
+  */
+ /*#define HAS_LSTAT           /**/
+ /* HAS_MBLEN:
+  *    This symbol, if defined, indicates that the mblen routine is available
+  *    to find the number of bytes in a multibye character.
+  */
+ #define HAS_MBLEN             /**/
+ /* HAS_MBSTOWCS:
+  *    This symbol, if defined, indicates that the mbstowcs routine is
+  *    available to covert a multibyte string into a wide character string.
+  */
+ #define       HAS_MBSTOWCS            /**/
+ /* HAS_MBTOWC:
+  *    This symbol, if defined, indicates that the mbtowc routine is available
+  *    to covert a multibyte to a wide character.
+  */
+ #define HAS_MBTOWC            /**/
+ /* HAS_MEMCMP:
+  *    This symbol, if defined, indicates that the memcmp routine is available
+  *    to compare blocks of memory.
+  */
+ #define HAS_MEMCMP    /**/
+ /* HAS_MEMCPY:
+  *    This symbol, if defined, indicates that the memcpy routine is available
+  *    to copy blocks of memory.
+  */
+ #define HAS_MEMCPY    /**/
+ /* HAS_MEMMOVE:
+  *    This symbol, if defined, indicates that the memmove routine is available
+  *    to copy potentially overlapping blocks of memory. This should be used
+  *    only when HAS_SAFE_BCOPY is not defined. If neither is there, roll your
+  *    own version.
+  */
+ #define HAS_MEMMOVE   /**/
+ /* HAS_MEMSET:
+  *    This symbol, if defined, indicates that the memset routine is available
+  *    to set blocks of memory.
+  */
+ #define HAS_MEMSET    /**/
+ /* HAS_MKDIR:
+  *    This symbol, if defined, indicates that the mkdir routine is available
+  *    to create directories.  Otherwise you should fork off a new process to
+  *    exec /bin/mkdir.
+  */
+ #define HAS_MKDIR             /**/
+ /* HAS_MKFIFO:
+  *    This symbol, if defined, indicates that the mkfifo routine is
+  *    available to create FIFOs. Otherwise, mknod should be able to
+  *    do it for you. However, if mkfifo is there, mknod might require
+  *    super-user privileges which mkfifo will not.
+  */
+ /*#define HAS_MKFIFO          /**/
+ /* HAS_MKTIME:
+  *    This symbol, if defined, indicates that the mktime routine is
+  *    available.
+  */
+ #define HAS_MKTIME            /**/
+ /* HAS_MSG:
+  *    This symbol, if defined, indicates that the entire msg*(2) library is
+  *    supported (IPC mechanism based on message queues).
+  */
+ /*#define HAS_MSG             /**/
+ /* HAS_NICE:
+  *    This symbol, if defined, indicates that the nice routine is
+  *    available.
+  */
+ /*#define HAS_NICE            /**/
+ /* HAS_OPEN3:
+  *    This manifest constant lets the C program know that the three
+  *    argument form of open(2) is available.
+  */
+ /*#define HAS_OPEN3           /**/
+ /* HAS_PATHCONF:
+  *    This symbol, if defined, indicates that pathconf() is available
+  *    to determine file-system related limits and options associated
+  *    with a given filename.
+  */
+ /* HAS_FPATHCONF:
+  *    This symbol, if defined, indicates that pathconf() is available
+  *    to determine file-system related limits and options associated
+  *    with a given open file descriptor.
+  */
+ /*#define HAS_PATHCONF                /**/
+ /*#define HAS_FPATHCONF               /**/
+ /* HAS_PAUSE:
+  *    This symbol, if defined, indicates that the pause routine is
+  *    available to suspend a process until a signal is received.
+  */
+ #define HAS_PAUSE             /**/
+ /* HAS_PIPE:
+  *    This symbol, if defined, indicates that the pipe routine is
+  *    available to create an inter-process channel.
+  */
+ #define HAS_PIPE              /**/
+ /* HAS_POLL:
+  *    This symbol, if defined, indicates that the poll routine is
+  *    available to poll active file descriptors.
+  */
+ /*#define HAS_POLL            /**/
+ /* HAS_READDIR:
+  *    This symbol, if defined, indicates that the readdir routine is
+  *    available to read directory entries. You may have to include
+  *    <dirent.h>. See I_DIRENT.
+  */
+ #define HAS_READDIR           /**/
+ /* HAS_SEEKDIR:
+  *    This symbol, if defined, indicates that the seekdir routine is
+  *    available. You may have to include <dirent.h>. See I_DIRENT.
+  */
+ #define HAS_SEEKDIR           /**/
+ /* HAS_TELLDIR:
+  *    This symbol, if defined, indicates that the telldir routine is
+  *    available. You may have to include <dirent.h>. See I_DIRENT.
+  */
+ #define HAS_TELLDIR           /**/
+ /* HAS_REWINDDIR:
+  *    This symbol, if defined, indicates that the rewinddir routine is
+  *    available. You may have to include <dirent.h>. See I_DIRENT.
+  */
+ #define HAS_REWINDDIR         /**/
+ /* HAS_READLINK:
+  *    This symbol, if defined, indicates that the readlink routine is
+  *    available to read the value of a symbolic link.
+  */
+ /*#define HAS_READLINK                /**/
+ /* HAS_RENAME:
+  *    This symbol, if defined, indicates that the rename routine is available
+  *    to rename files.  Otherwise you should do the unlink(), link(), unlink()
+  *    trick.
+  */
+ #define HAS_RENAME    /**/
+ /* HAS_RMDIR:
+  *    This symbol, if defined, indicates that the rmdir routine is
+  *    available to remove directories. Otherwise you should fork off a
+  *    new process to exec /bin/rmdir.
+  */
+ #define HAS_RMDIR             /**/
+ /* HAS_SAFE_BCOPY:
+  *    This symbol, if defined, indicates that the bcopy routine is available
+  *    to copy potentially overlapping memory blocks. Otherwise you should
+  *    probably use memmove() or memcpy(). If neither is defined, roll your
+  *    own version.
+  */
+ /*#define HAS_SAFE_BCOPY      /**/
+ /* HAS_SAFE_MEMCPY:
+  *    This symbol, if defined, indicates that the memcpy routine is available
+  *    to copy potentially overlapping memory blocks. Otherwise you should
+  *    probably use memmove() or memcpy(). If neither is defined, roll your
+  *    own version.
+  */
+ /*#define HAS_SAFE_MEMCPY     /**/
+ /* HAS_SANE_MEMCMP:
+  *    This symbol, if defined, indicates that the memcmp routine is available
+  *    and can be used to compare relative magnitudes of chars with their high
+  *    bits set.  If it is not defined, roll your own version.
+  */
+ #define HAS_SANE_MEMCMP       /**/
+ /* HAS_SELECT:
+  *    This symbol, if defined, indicates that the select routine is
+  *    available to select active file descriptors. If the timeout field
+  *    is used, <sys/time.h> may need to be included.
+  */
+ #define HAS_SELECT    /**/
+ /* HAS_SEM:
+  *    This symbol, if defined, indicates that the entire sem*(2) library is
+  *    supported.
+  */
+ /*#define HAS_SEM             /**/
+ /* HAS_SETEGID:
+  *    This symbol, if defined, indicates that the setegid routine is available
+  *    to change the effective gid of the current program.
+  */
+ /*#define HAS_SETEGID         /**/
+ /* HAS_SETEUID:
+  *    This symbol, if defined, indicates that the seteuid routine is available
+  *    to change the effective uid of the current program.
+  */
+ /*#define HAS_SETEUID         /**/
+ /* HAS_SETLINEBUF:
+  *    This symbol, if defined, indicates that the setlinebuf routine is
+  *    available to change stderr or stdout from block-buffered or unbuffered
+  *    to a line-buffered mode.
+  */
+ /*#define HAS_SETLINEBUF              /**/
+ /* HAS_SETLOCALE:
+  *    This symbol, if defined, indicates that the setlocale routine is
+  *    available to handle locale-specific ctype implementations.
+  */
+ #define HAS_SETLOCALE /**/
+ /* HAS_SETPGRP2:
+  *    This symbol, if defined, indicates that the setpgrp2() (as in DG/UX)
+  *    routine is available to set the current process group.
+  */
+ /*#define HAS_SETPGRP2                /**/
+ /* HAS_SETPRIORITY:
+  *    This symbol, if defined, indicates that the setpriority routine is
+  *    available to set a process's priority.
+  */
+ /*#define HAS_SETPRIORITY             /**/
+ /* HAS_SETREGID:
+  *    This symbol, if defined, indicates that the setregid routine is
+  *    available to change the real and effective gid of the current
+  *    process.
+  */
+ /* HAS_SETRESGID:
+  *    This symbol, if defined, indicates that the setresgid routine is
+  *    available to change the real, effective and saved gid of the current
+  *    process.
+  */
+ /*#define HAS_SETREGID                /**/
+ /*#define HAS_SETRESGID               /**/
+ /* HAS_SETREUID:
+  *    This symbol, if defined, indicates that the setreuid routine is
+  *    available to change the real and effective uid of the current
+  *    process.
+  */
+ /* HAS_SETRESUID:
+  *    This symbol, if defined, indicates that the setresuid routine is
+  *    available to change the real, effective and saved uid of the current
+  *    process.
+  */
+ /*#define HAS_SETREUID                /**/
+ /*#define HAS_SETRESUID               /**/
+ /* HAS_SETRGID:
+  *    This symbol, if defined, indicates that the setrgid routine is available
+  *    to change the real gid of the current program.
+  */
+ /*#define HAS_SETRGID         /**/
+ /* HAS_SETRUID:
+  *    This symbol, if defined, indicates that the setruid routine is available
+  *    to change the real uid of the current program.
+  */
+ /*#define HAS_SETRUID         /**/
+ /* HAS_SETSID:
+  *    This symbol, if defined, indicates that the setsid routine is
+  *    available to set the process group ID.
+  */
+ /*#define HAS_SETSID  /**/
+ /* HAS_SHM:
+  *    This symbol, if defined, indicates that the entire shm*(2) library is
+  *    supported.
+  */
+ /*#define HAS_SHM             /**/
+ /* Shmat_t:
+  *    This symbol holds the return type of the shmat() system call.
+  *    Usually set to 'void *' or 'char *'.
+  */
+ /* HAS_SHMAT_PROTOTYPE:
+  *    This symbol, if defined, indicates that the sys/shm.h includes
+  *    a prototype for shmat().  Otherwise, it is up to the program to
+  *    guess one.  Shmat_t shmat _((int, Shmat_t, int)) is a good guess,
+  *    but not always right so it should be emitted by the program only
+  *    when HAS_SHMAT_PROTOTYPE is not defined to avoid conflicting defs.
+  */
+ #define Shmat_t void *        /**/
+ /*#define HAS_SHMAT_PROTOTYPE /**/
+ /* HAS_SIGACTION:
+  *    This symbol, if defined, indicates that Vr4's sigaction() routine
+  *    is available.
+  */
+ /*#define HAS_SIGACTION       /**/
+ /* HAS_SOCKET:
+  *    This symbol, if defined, indicates that the BSD socket interface is
+  *    supported.
+  */
+ /* HAS_SOCKETPAIR:
+  *    This symbol, if defined, indicates that the BSD socketpair() call is
+  *    supported.
+  */
+ #define HAS_SOCKET            /**/
+ /*#define HAS_SOCKETPAIR      /**/
+ /* USE_STAT_BLOCKS:
+  *    This symbol is defined if this system has a stat structure declaring
+  *    st_blksize and st_blocks.
+  */
+ /*#define USE_STAT_BLOCKS     /**/
+ /* USE_STDIO_PTR:
+  *    This symbol is defined if the _ptr and _cnt fields (or similar)
+  *    of the stdio FILE structure can be used to access the stdio buffer
+  *    for a file handle.  If this is defined, then the FILE_ptr(fp)
+  *    and FILE_cnt(fp) macros will also be defined and should be used
+  *    to access these fields.
+  */
+ /* FILE_ptr:
+  *    This macro is used to access the _ptr field (or equivalent) of the
+  *    FILE structure pointed to by its argument. This macro will always be
+  *    defined if USE_STDIO_PTR is defined.
+  */
+ /* STDIO_PTR_LVALUE:
+  *    This symbol is defined if the FILE_ptr macro can be used as an
+  *    lvalue.
+  */
+ /* FILE_cnt:
+  *    This macro is used to access the _cnt field (or equivalent) of the
+  *    FILE structure pointed to by its argument. This macro will always be
+  *    defined if USE_STDIO_PTR is defined.
+  */
+ /* STDIO_CNT_LVALUE:
+  *    This symbol is defined if the FILE_cnt macro can be used as an
+  *    lvalue.
+  */
+ #define USE_STDIO_PTR         /**/
+ #ifdef USE_STDIO_PTR
+ #define FILE_ptr(fp)  ((fp)->curp)
+ #define STDIO_PTR_LVALUE              /**/
+ #define FILE_cnt(fp)  ((fp)->level)
+ #define STDIO_CNT_LVALUE              /**/
+ #endif
+ /* USE_STDIO_BASE:
+  *    This symbol is defined if the _base field (or similar) of the
+  *    stdio FILE structure can be used to access the stdio buffer for
+  *    a file handle.  If this is defined, then the FILE_base(fp) macro
+  *    will also be defined and should be used to access this field.
+  *    Also, the FILE_bufsiz(fp) macro will be defined and should be used
+  *    to determine the number of bytes in the buffer.  USE_STDIO_BASE
+  *    will never be defined unless USE_STDIO_PTR is.
+  */
+ /* FILE_base:
+  *    This macro is used to access the _base field (or equivalent) of the
+  *    FILE structure pointed to by its argument. This macro will always be
+  *    defined if USE_STDIO_BASE is defined.
+  */
+ /* FILE_bufsiz:
+  *    This macro is used to determine the number of bytes in the I/O
+  *    buffer pointed to by _base field (or equivalent) of the FILE
+  *    structure pointed to its argument. This macro will always be defined
+  *    if USE_STDIO_BASE is defined.
+  */
+ #define USE_STDIO_BASE        /**/
+ #ifdef USE_STDIO_BASE
+ #define FILE_base(fp) ((fp)->buffer)
+ #define FILE_bufsiz(fp)       ((fp)->level + (fp)->curp - (fp)->buffer)
+ #endif
+ /* HAS_STRCHR:
+  *    This symbol is defined to indicate that the strchr()/strrchr()
+  *    functions are available for string searching. If not, try the
+  *    index()/rindex() pair.
+  */
+ /* HAS_INDEX:
+  *    This symbol is defined to indicate that the index()/rindex()
+  *    functions are available for string searching.
+  */
+ #define HAS_STRCHR    /**/
+ /*#define HAS_INDEX   /**/
+ /* HAS_STRCOLL:
+  *    This symbol, if defined, indicates that the strcoll routine is
+  *    available to compare strings using collating information.
+  */
+ #define HAS_STRCOLL   /**/
+ /* USE_STRUCT_COPY:
+  *    This symbol, if defined, indicates that this C compiler knows how
+  *    to copy structures.  If undefined, you'll need to use a block copy
+  *    routine of some sort instead.
+  */
+ #define       USE_STRUCT_COPY /**/
+ /* HAS_STRERROR:
+  *    This symbol, if defined, indicates that the strerror routine is
+  *    available to translate error numbers to strings. See the writeup
+  *    of Strerror() in this file before you try to define your own.
+  */
+ /* HAS_SYS_ERRLIST:
+  *    This symbol, if defined, indicates that the sys_errlist array is
+  *    available to translate error numbers to strings. The extern int
+  *    sys_nerr gives the size of that table.
+  */
+ /* Strerror:
+  *    This preprocessor symbol is defined as a macro if strerror() is
+  *    not available to translate error numbers to strings but sys_errlist[]
+  *    array is there.
+  */
+ #define HAS_STRERROR          /**/
+ #define HAS_SYS_ERRLIST       /**/
+ #define Strerror(e) strerror(e)
+ /* HAS_STRTOD:
+  *    This symbol, if defined, indicates that the strtod routine is
+  *    available to provide better numeric string conversion than atof().
+  */
+ #define HAS_STRTOD    /**/
+ /* HAS_STRTOL:
+  *    This symbol, if defined, indicates that the strtol routine is available
+  *    to provide better numeric string conversion than atoi() and friends.
+  */
+ #define HAS_STRTOL    /**/
+ /* HAS_STRTOUL:
+  *    This symbol, if defined, indicates that the strtoul routine is
+  *    available to provide conversion of strings to unsigned long.
+  */
+ #define HAS_STRTOUL   /**/
+ /* HAS_STRXFRM:
+  *    This symbol, if defined, indicates that the strxfrm() routine is
+  *    available to transform strings.
+  */
+ #define HAS_STRXFRM   /**/
+ /* HAS_SYMLINK:
+  *    This symbol, if defined, indicates that the symlink routine is available
+  *    to create symbolic links.
+  */
+ /*#define HAS_SYMLINK /**/
+ /* HAS_SYSCALL:
+  *    This symbol, if defined, indicates that the syscall routine is
+  *    available to call arbitrary system calls. If undefined, that's tough.
+  */
+ /*#define HAS_SYSCALL /**/
+ /* HAS_SYSCONF:
+  *    This symbol, if defined, indicates that sysconf() is available
+  *    to determine system related limits and options.
+  */
+ /*#define HAS_SYSCONF /**/
+ /* HAS_SYSTEM:
+  *    This symbol, if defined, indicates that the system routine is
+  *    available to issue a shell command.
+  */
+ #define HAS_SYSTEM    /**/
+ /* HAS_TCGETPGRP:
+  *    This symbol, if defined, indicates that the tcgetpgrp routine is
+  *    available to get foreground process group ID.
+  */
+ /*#define HAS_TCGETPGRP               /**/
+ /* HAS_TCSETPGRP:
+  *    This symbol, if defined, indicates that the tcsetpgrp routine is
+  *    available to set foreground process group ID.
+  */
+ /*#define HAS_TCSETPGRP               /**/
+ /* Time_t:
+  *    This symbol holds the type returned by time(). It can be long,
+  *    or time_t on BSD sites (in which case <sys/types.h> should be
+  *    included).
+  */
+ #define Time_t time_t         /* Time type */
+ /* HAS_TIMES:
+  *    This symbol, if defined, indicates that the times() routine exists.
+  *    Note that this became obsolete on some systems (SUNOS), which now
+  * use getrusage(). It may be necessary to include <sys/times.h>.
+  */
+ #define HAS_TIMES             /**/
+ /* HAS_TRUNCATE:
+  *    This symbol, if defined, indicates that the truncate routine is
+  *    available to truncate files.
+  */
+ /*#define HAS_TRUNCATE        /**/
+ /* HAS_TZNAME:
+  *    This symbol, if defined, indicates that the tzname[] array is
+  *    available to access timezone names.
+  */
+ #define HAS_TZNAME            /**/
+ /* HAS_UMASK:
+  *    This symbol, if defined, indicates that the umask routine is
+  *    available to set and get the value of the file creation mask.
+  */
+ #define HAS_UMASK             /**/
+ /* HAS_VFORK:
+  *    This symbol, if defined, indicates that vfork() exists.
+  */
+ /*#define HAS_VFORK   /**/
+ /* Signal_t:
+  *    This symbol's value is either "void" or "int", corresponding to the
+  *    appropriate return type of a signal handler.  Thus, you can declare
+  *    a signal handler using "Signal_t (*handler)()", and define the
+  *    handler using "Signal_t handler(sig)".
+  */
+ #define Signal_t void /* Signal handler's return type */
+ /* HASVOLATILE:
+  *    This symbol, if defined, indicates that this C compiler knows about
+  *    the volatile declaration.
+  */
+ #define       HASVOLATILE     /**/
+ #ifndef HASVOLATILE
+ #define volatile
+ #endif
+ /* HAS_VPRINTF:
+  *    This symbol, if defined, indicates that the vprintf routine is available
+  *    to printf with a pointer to an argument list.  If unavailable, you
+  *    may need to write your own, probably in terms of _doprnt().
+  */
+ /* USE_CHAR_VSPRINTF:
+  *    This symbol is defined if this system has vsprintf() returning type
+  *    (char*).  The trend seems to be to declare it as "int vsprintf()".  It
+  *    is up to the package author to declare vsprintf correctly based on the
+  *    symbol.
+  */
+ #define HAS_VPRINTF   /**/
+ /*#define USE_CHAR_VSPRINTF   /**/
+ /* HAS_WAIT4:
+  *    This symbol, if defined, indicates that wait4() exists.
+  */
+ /*#define HAS_WAIT4   /**/
+ /* HAS_WAITPID:
+  *    This symbol, if defined, indicates that the waitpid routine is
+  *    available to wait for child process.
+  */
+ /*#define HAS_WAITPID /**/
+ /* HAS_WCSTOMBS:
+  *    This symbol, if defined, indicates that the wcstombs routine is
+  *    available to convert wide character strings to multibyte strings.
+  */
+ #define HAS_WCSTOMBS  /**/
+ /* HAS_WCTOMB:
+  *    This symbol, if defined, indicates that the wctomb routine is available
+  *    to covert a wide character to a multibyte.
+  */
+ #define HAS_WCTOMB            /**/
+ /* Fpos_t:
+  *    This symbol holds the type used to declare file positions in libc.
+  *    It can be fpos_t, long, uint, etc... It may be necessary to include
+  *    <sys/types.h> to get any typedef'ed information.
+  */
+ #define Fpos_t fpos_t         /* File position type */
+ /* Gid_t:
+  *    This symbol holds the return type of getgid() and the type of
+  *    argument to setrgid() and related functions.  Typically,
+  *    it is the type of group ids in the kernel. It can be int, ushort,
+  *    uid_t, etc... It may be necessary to include <sys/types.h> to get
+  *    any typedef'ed information.
+  */
+ #define Gid_t gid_t           /* Type for getgid(), etc... */
+ /* Groups_t:
+  *    This symbol holds the type used for the second argument to
+  *    [gs]etgroups().  Usually, this is the same of gidtype, but
+  *    sometimes it isn't.  It can be int, ushort, uid_t, etc... 
+  *    It may be necessary to include <sys/types.h> to get any 
+  *    typedef'ed information.  This is only required if you have
+  *    getgroups() or setgroups().
+  */
+ #if defined(HAS_GETGROUPS) || defined(HAS_SETGROUPS)
+ #define Groups_t gid_t        /* Type for 2nd arg to [gs]etgroups() */
+ #endif
+ /* DB_Prefix_t:
+  *    This symbol contains the type of the prefix structure element
+  *    in the <db.h> header file.  In older versions of DB, it was
+  *    int, while in newer ones it is u_int32_t.
+  */
+ /* DB_Hash_t:
+  *    This symbol contains the type of the prefix structure element
+  *    in the <db.h> header file.  In older versions of DB, it was
+  *    int, while in newer ones it is size_t.
+  */
+ #define DB_Hash_t     int             /**/
+ #define DB_Prefix_t   int     /**/
+ /* I_DIRENT:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <dirent.h>. Using this symbol also triggers the definition
+  *    of the Direntry_t define which ends up being 'struct dirent' or
+  *    'struct direct' depending on the availability of <dirent.h>.
+  */
+ /* DIRNAMLEN:
+  *    This symbol, if defined, indicates to the C program that the length
+  *    of directory entry names is provided by a d_namlen field.  Otherwise
+  *    you need to do strlen() on the d_name field.
+  */
+ /* Direntry_t:
+  *    This symbol is set to 'struct direct' or 'struct dirent' depending on
+  *    whether dirent is available or not. You should use this pseudo type to
+  *    portably declare your directory entries.
+  */
+ #define I_DIRENT              /**/
+ #define DIRNAMLEN     /**/
+ #define Direntry_t struct direct
+ /* I_DLFCN:
+  *    This symbol, if defined, indicates that <dlfcn.h> exists and should
+  *    be included.
+  */
+ #define I_DLFCN               /**/
+ /* I_FCNTL:
+  *    This manifest constant tells the C program to include <fcntl.h>.
+  */
+ #define I_FCNTL       /**/
+ /* I_FLOAT:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <float.h> to get definition of symbols like DBL_MAX or
+  *    DBL_MIN, i.e. machine dependent floating point values.
+  */
+ #define I_FLOAT               /**/
+ /* I_GRP:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <grp.h>.
+  */
+ #define I_GRP         /**/
+ /* I_LIMITS:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <limits.h> to get definition of symbols like WORD_BIT or
+  *    LONG_MAX, i.e. machine dependant limitations.
+  */
+ #define I_LIMITS              /**/
+ /* I_MATH:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <math.h>.
+  */
+ #define I_MATH                /**/
+ /* I_MEMORY:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <memory.h>.
+  */
+ /*#define I_MEMORY            /**/
+ /* I_NDBM:
+  *    This symbol, if defined, indicates that <ndbm.h> exists and should
+  *    be included.
+  */
+ /*#define I_NDBM      /**/
+ /* I_NET_ERRNO:
+  *    This symbol, if defined, indicates that <net/errno.h> exists and 
+  *    should be included.
+  */
+ /*#define I_NET_ERRNO         /**/
+ /* I_NETINET_IN:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <netinet/in.h>. Otherwise, you may try <sys/in.h>.
+  */
+ /*#define I_NETINET_IN        /**/
+ /* I_PWD:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <pwd.h>.
+  */
+ /* PWQUOTA:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_quota.
+  */
+ /* PWAGE:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_age.
+  */
+ /* PWCHANGE:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_change.
+  */
+ /* PWCLASS:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_class.
+  */
+ /* PWEXPIRE:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_expire.
+  */
+ /* PWCOMMENT:
+  *    This symbol, if defined, indicates to the C program that struct passwd
+  *    contains pw_comment.
+  */
+ /*#define I_PWD               /**/
+ /*#define PWQUOTA     /**/
+ /*#define PWAGE       /**/
+ /*#define PWCHANGE    /**/
+ /*#define PWCLASS     /**/
+ /*#define PWEXPIRE    /**/
+ /*#define PWCOMMENT   /**/
+ /* I_STDDEF:
+  *    This symbol, if defined, indicates that <stddef.h> exists and should
+  *    be included.
+  */
+ #define I_STDDEF      /**/
+ /* I_STDLIB:
+  *    This symbol, if defined, indicates that <stdlib.h> exists and should
+  *    be included.
+  */
+ #define I_STDLIB              /**/
+ /* I_STRING:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <string.h> (USG systems) instead of <strings.h> (BSD systems).
+  */
+ #define I_STRING              /**/
+ /* I_SYS_DIR:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/dir.h>.
+  */
+ /*#define I_SYS_DIR           /**/
+ /* I_SYS_FILE:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/file.h> to get definition of R_OK and friends.
+  */
+ /*#define I_SYS_FILE          /**/
+ /* I_SYS_IOCTL:
+  *    This symbol, if defined, indicates that <sys/ioctl.h> exists and should
+  *    be included. Otherwise, include <sgtty.h> or <termio.h>.
+  */
+ /*#define     I_SYS_IOCTL             /**/
+ /* I_SYS_NDIR:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/ndir.h>.
+  */
+ /*#define I_SYS_NDIR  /**/
+ /* I_SYS_PARAM:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/param.h>.
+  */
+ /*#define I_SYS_PARAM         /**/
+ /* I_SYS_RESOURCE:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/resource.h>.
+  */
+ /*#define I_SYS_RESOURCE              /**/
+ /* I_SYS_SELECT:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/select.h> in order to get definition of struct timeval.
+  */
+ /*#define I_SYS_SELECT        /**/
+ /* I_SYS_TIMES:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/times.h>.
+  */
+ /*#define     I_SYS_TIMES             /**/
+ /* I_SYS_TYPES:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/types.h>.
+  */
+ #define       I_SYS_TYPES             /**/
+ /* I_SYS_UN:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/un.h> to get UNIX domain socket definitions.
+  */
+ /*#define I_SYS_UN            /**/
+ /* I_SYS_WAIT:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/wait.h>.
+  */
+ /*#define I_SYS_WAIT  /**/
+ /* I_TERMIO:
+  *    This symbol, if defined, indicates that the program should include
+  *    <termio.h> rather than <sgtty.h>.  There are also differences in
+  *    the ioctl() calls that depend on the value of this symbol.
+  */
+ /* I_TERMIOS:
+  *    This symbol, if defined, indicates that the program should include
+  *    the POSIX termios.h rather than sgtty.h or termio.h.
+  *    There are also differences in the ioctl() calls that depend on the
+  *    value of this symbol.
+  */
+ /* I_SGTTY:
+  *    This symbol, if defined, indicates that the program should include
+  *    <sgtty.h> rather than <termio.h>.  There are also differences in
+  *    the ioctl() calls that depend on the value of this symbol.
+  */
+ /*#define I_TERMIO            /**/
+ /*#define I_TERMIOS           /**/
+ /*#define I_SGTTY             /**/
+ /* I_TIME:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <time.h>.
+  */
+ /* I_SYS_TIME:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/time.h>.
+  */
+ /* I_SYS_TIME_KERNEL:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/time.h> with KERNEL defined.
+  */
+ #define I_TIME                /**/
+ /*#define I_SYS_TIME          /**/
+ /*#define I_SYS_TIME_KERNEL           /**/
+ /* I_UNISTD:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <unistd.h>.
+  */
+ /*#define I_UNISTD            /**/
+ /* I_UTIME:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <utime.h>.
+  */
+ #define I_UTIME               /**/
+ /* I_STDARG:
+  *    This symbol, if defined, indicates that <stdarg.h> exists and should
+  *    be included.
+  */
+ /* I_VARARGS:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <varargs.h>.
+  */
+ #define I_STDARG              /**/
+ /*#define I_VARARGS   /**/
+ /* I_VFORK:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include vfork.h.
+  */
+ /*#define I_VFORK     /**/
+ /* INTSIZE:
+  *    This symbol contains the value of sizeof(int) so that the C
+  *    preprocessor can make decisions based on it.
+  */
+ /* LONGSIZE:
+  *    This symbol contains the value of sizeof(long) so that the C
+  *    preprocessor can make decisions based on it.
+  */
+ /* SHORTSIZE:
+  *    This symbol contains the value of sizeof(short) so that the C
+  *    preprocessor can make decisions based on it.
+  */
+ #define INTSIZE 4             /**/
+ #define LONGSIZE 4            /**/
+ #define SHORTSIZE 2           /**/
+ /* Off_t:
+  *    This symbol holds the type used to declare offsets in the kernel.
+  *    It can be int, long, off_t, etc... It may be necessary to include
+  *    <sys/types.h> to get any typedef'ed information.
+  */
+ #define Off_t off_t           /* <offset> type */
+ /* Mode_t:
+  *    This symbol holds the type used to declare file modes 
+  *    for systems calls.  It is usually mode_t, but may be
+  *    int or unsigned short.  It may be necessary to include <sys/types.h>
+  *    to get any typedef'ed information.
+  */
+ #define Mode_t mode_t  /* file mode parameter for system calls */
+ /* VAL_O_NONBLOCK:
+  *    This symbol is to be used during open() or fcntl(F_SETFL) to turn on
+  *    non-blocking I/O for the file descriptor. Note that there is no way
+  *    back, i.e. you cannot turn it blocking again this way. If you wish to
+  *    alternatively switch between blocking and non-blocking, use the
+  *    ioctl(FIOSNBIO) call instead, but that is not supported by all devices.
+  */
+ /* VAL_EAGAIN:
+  *    This symbol holds the errno error code set by read() when no data was
+  *    present on the non-blocking file descriptor.
+  */
+ /* RD_NODATA:
+  *    This symbol holds the return code from read() when no data is present
+  *    on the non-blocking file descriptor. Be careful! If EOF_NONBLOCK is
+  *    not defined, then you can't distinguish between no data and EOF by
+  *    issuing a read(). You'll have to find another way to tell for sure!
+  */
+ /* EOF_NONBLOCK:
+  *    This symbol, if defined, indicates to the C program that a read() on
+  *    a non-blocking file descriptor will return 0 on EOF, and not the value
+  *    held in RD_NODATA (-1 usually, in that case!).
+  */
+ #define VAL_O_NONBLOCK O_NONBLOCK
+ #define VAL_EAGAIN EAGAIN
+ #define RD_NODATA -1
+ #define EOF_NONBLOCK
+ /* CAN_PROTOTYPE:
+  *    If defined, this macro indicates that the C compiler can handle
+  *    function prototypes.
+  */
+ /* _:
+  *    This macro is used to declare function parameters for folks who want
+  *    to make declarations with prototypes using a different style than
+  *    the above macros.  Use double parentheses.  For example:
+  *
+  *            int main _((int argc, char *argv[]));
+  */
+ #define       CAN_PROTOTYPE   /**/
+ #ifdef CAN_PROTOTYPE
+ #define       _(args) args
+ #else
+ #define       _(args) ()
+ #endif
+ /* RANDBITS:
+  *    This symbol contains the number of bits of random number the rand()
+  *    function produces.  Usual values are 15, 16, and 31.
+  */
+ #define RANDBITS 15           /**/
+ /* Select_fd_set_t:
+  *    This symbol holds the type used for the 2nd, 3rd, and 4th
+  *    arguments to select.  Usually, this is 'fd_set *', if HAS_FD_SET
+  *    is defined, and 'int *' otherwise.  This is only useful if you 
+  *    have select(), of course.
+  */
+ #define Select_fd_set_t       int *   /**/
+ /* Size_t:
+  *    This symbol holds the type used to declare length parameters
+  *    for string functions.  It is usually size_t, but may be
+  *    unsigned long, int, etc.  It may be necessary to include
+  *    <sys/types.h> to get any typedef'ed information.
+  */
+ #define Size_t size_t  /* length paramater for string functions */
+ /* SSize_t:
+  *    This symbol holds the type used by functions that return
+  *    a count of bytes or an error condition.  It must be a signed type.
+  *    It is usually ssize_t, but may be long or int, etc.
+  *    It may be necessary to include <sys/types.h> or <unistd.h>
+  *    to get any typedef'ed information.
+  *    We will pick a type such that sizeof(SSize_t) == sizeof(Size_t).
+  */
+ #define SSize_t int    /* signed count of bytes */
+ /* STDCHAR:
+  *    This symbol is defined to be the type of char used in stdio.h.
+  *    It has the values "unsigned char" or "char".
+  */
+ #define STDCHAR unsigned char /**/
+ /* Uid_t:
+  *    This symbol holds the type used to declare user ids in the kernel.
+  *    It can be int, ushort, uid_t, etc... It may be necessary to include
+  *    <sys/types.h> to get any typedef'ed information.
+  */
+ #define Uid_t uid_t           /* UID type */
+ /* LOC_SED:
+  *    This symbol holds the complete pathname to the sed program.
+  */
+ #define LOC_SED       ""      /**/
+ /* OSNAME:
+  *    This symbol contains the name of the operating system, as determined
+  *    by Configure.  You shouldn't rely on it too much; the specific
+  *    feature tests from Configure are generally more reliable.
+  */
+ #define OSNAME "MSWin32"              /**/
+ /* ARCHLIB:
+  *    This variable, if defined, holds the name of the directory in
+  *    which the user wants to put architecture-dependent public
+  *    library files for perl5.  It is most often a local directory
+  *    such as /usr/local/lib.  Programs using this variable must be
+  *    prepared to deal with filename expansion.  If ARCHLIB is the
+  *    same as PRIVLIB, it is not defined, since presumably the
+  *    program already searches PRIVLIB.
+  */
+ /* ARCHLIB_EXP:
+  *    This symbol contains the ~name expanded version of ARCHLIB, to be used
+  *    in programs that are not prepared to deal with ~ expansion at run-time.
+  */
+ #define ARCHLIB "c:\\perl\\lib"               /**/
+ #define ARCHLIB_EXP (win32PerlLibPath())      /**/
+ /* BINCOMPAT3:
+  *    This symbol, if defined, indicates that Perl 5.004 should be
+  *    binary-compatible with Perl 5.003.
+  */
+ /*#define BINCOMPAT3                  /**/
+ /* BYTEORDER:
+  *    This symbol holds the hexadecimal constant defined in byteorder,
+  *    i.e. 0x1234 or 0x4321, etc...
+  *    On NeXT 3.2 (and greater), you can build "Fat" Multiple Architecture
+  *    Binaries (MAB) on either big endian or little endian machines.
+  *    The endian-ness is available at compile-time.  This only matters
+  *    for perl, where the config.h can be generated and installed on 
+  *    one system, and used by a different architecture to build an
+  *    extension.  Older versions of NeXT that might not have
+  *    defined either *_ENDIAN__ were all on Motorola 680x0 series,
+  *    so the default case (for NeXT) is big endian to catch them. 
+  *    This might matter for NeXT 3.0.
+  */
+ #ifndef NeXT
+ #define BYTEORDER 0x1234      /* large digits for MSB */
+ #else  /* NeXT */
+ #ifdef __LITTLE_ENDIAN__
+ #define BYTEORDER 0x1234
+ #else /* __BIG_ENDIAN__ */
+ #define BYTEORDER 0x4321
+ #endif /* ENDIAN CHECK */
+ #endif /* NeXT */
+ /* CSH:
+  *    This symbol, if defined, indicates that the C-shell exists.
+  *    If defined, contains the full pathname of csh.
+  */
+ /*#define CSH ""              /**/
+ /* DLSYM_NEEDS_UNDERSCORE:
+  *    This symbol, if defined, indicates that we need to prepend an
+  *    underscore to the symbol name before calling dlsym().  This only
+  *    makes sense if you *have* dlsym, which we will presume is the
+  *    case if you're using dl_dlopen.xs.
+  */
+ /*#define     DLSYM_NEEDS_UNDERSCORE  /**/
+ /* SETUID_SCRIPTS_ARE_SECURE_NOW:
+  *    This symbol, if defined, indicates that the bug that prevents
+  *    setuid scripts from being secure is not present in this kernel.
+  */
+ /* DOSUID:
+  *    This symbol, if defined, indicates that the C program should
+  *    check the script that it is executing for setuid/setgid bits, and
+  *    attempt to emulate setuid/setgid on systems that have disabled
+  *    setuid #! scripts because the kernel can't do it securely.
+  *    It is up to the package designer to make sure that this emulation
+  *    is done securely.  Among other things, it should do an fstat on
+  *    the script it just opened to make sure it really is a setuid/setgid
+  *    script, it should make sure the arguments passed correspond exactly
+  *    to the argument on the #! line, and it should not trust any
+  *    subprocesses to which it must pass the filename rather than the
+  *    file descriptor of the script to be executed.
+  */
+ /*#define SETUID_SCRIPTS_ARE_SECURE_NOW       /**/
+ /*#define DOSUID              /**/
+ /* Gconvert:
+  *    This preprocessor macro is defined to convert a floating point
+  *    number to a string without a trailing decimal point.  This
+  *    emulates the behavior of sprintf("%g"), but is sometimes much more
+  *    efficient.  If gconvert() is not available, but gcvt() drops the
+  *    trailing decimal point, then gcvt() is used.  If all else fails,
+  *    a macro using sprintf("%g") is used. Arguments for the Gconvert
+  *    macro are: value, number of digits, whether trailing zeros should
+  *    be retained, and the output buffer.
+  *    Possible values are:
+  *            d_Gconvert='gconvert((x),(n),(t),(b))'
+  *            d_Gconvert='gcvt((x),(n),(b))'
+  *            d_Gconvert='sprintf((b),"%.*g",(n),(x))'
+  *    The last two assume trailing zeros should not be kept.
+  */
 -#define SH_PATH "cmd.exe"  /**/
++#define Gconvert(x,n,t,b) sprintf((b),"%.*g",(n),(x))
+ /* HAS_GETPGID:
+  *    This symbol, if defined, indicates to the C program that 
+  *    the getpgid(pid) function is available to get the
+  *    process group id.
+  */
+ /*#define HAS_GETPGID         /**/
+ /* HAS_GETPGRP:
+  *    This symbol, if defined, indicates that the getpgrp routine is
+  *    available to get the current process group.
+  */
+ /* USE_BSD_GETPGRP:
+  *    This symbol, if defined, indicates that getpgrp needs one
+  *    arguments whereas USG one needs none.
+  */
+ /*#define HAS_GETPGRP         /**/
+ /*#define USE_BSD_GETPGRP     /**/
+ /* HAS_INET_ATON:
+  *    This symbol, if defined, indicates to the C program that the
+  *    inet_aton() function is available to parse IP address "dotted-quad"
+  *    strings.
+  */
+ /*#define HAS_INET_ATON               /**/
+ /* HAS_SETPGID:
+  *    This symbol, if defined, indicates to the C program that 
+  *    the setpgid(pid, gpid) function is available to set the
+  *    process group id.
+  */
+ /*#define HAS_SETPGID         /**/
+ /* HAS_SETPGRP:
+  *    This symbol, if defined, indicates that the setpgrp routine is
+  *    available to set the current process group.
+  */
+ /* USE_BSD_SETPGRP:
+  *    This symbol, if defined, indicates that setpgrp needs two
+  *    arguments whereas USG one needs none.  See also HAS_SETPGID
+  *    for a POSIX interface.
+  */
+ /* USE_BSDPGRP:
+  *    This symbol, if defined, indicates that the BSD notion of process
+  *    group is to be used. For instance, you have to say setpgrp(pid, pgrp)
+  *    instead of the USG setpgrp().  This should be obsolete since
+  *    there are systems which have BSD-ish setpgrp but USG-ish getpgrp.
+  */
+ /*#define HAS_SETPGRP         /**/
+ /*#define USE_BSD_SETPGRP     /**/
+ /*#define USE_BSDPGRP         /**/
+ /* USE_SFIO:
+  *    This symbol, if defined, indicates that sfio should
+  *    be used.
+  */
+ /*#define     USE_SFIO                /**/
+ /* Sigjmp_buf:
+  *    This is the buffer type to be used with Sigsetjmp and Siglongjmp.
+  */
+ /* Sigsetjmp:
+  *    This macro is used in the same way as sigsetjmp(), but will invoke
+  *    traditional setjmp() if sigsetjmp isn't available.
+  *    See HAS_SIGSETJMP.
+  */
+ /* Siglongjmp:
+  *    This macro is used in the same way as siglongjmp(), but will invoke
+  *    traditional longjmp() if siglongjmp isn't available.
+  *    See HAS_SIGSETJMP.
+  */
+ /*#define HAS_SIGSETJMP       /**/
+ #ifdef HAS_SIGSETJMP
+ #define Sigjmp_buf sigjmp_buf
+ #define Sigsetjmp(buf,save_mask) sigsetjmp((buf),(save_mask))
+ #define Siglongjmp(buf,retval) siglongjmp((buf),(retval))
+ #else
+ #define Sigjmp_buf jmp_buf
+ #define Sigsetjmp(buf,save_mask) setjmp((buf))
+ #define Siglongjmp(buf,retval) longjmp((buf),(retval))
+ #endif
+ /* USE_DYNAMIC_LOADING:
+  *    This symbol, if defined, indicates that dynamic loading of
+  *    some sort is available.
+  */
+ #define USE_DYNAMIC_LOADING           /**/
+ /* I_DBM:
+  *    This symbol, if defined, indicates that <dbm.h> exists and should
+  *    be included.
+  */
+ /* I_RPCSVC_DBM:
+  *    This symbol, if defined, indicates that <rpcsvc/dbm.h> exists and
+  *    should be included.
+  */
+ /*#define I_DBM       /**/
+ #define I_RPCSVC_DBM  /**/
+ /* I_LOCALE:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <locale.h>.
+  */
+ #define       I_LOCALE                /**/
+ /* I_SFIO:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sfio.h>.
+  */
+ /*#define     I_SFIO          /**/
+ /* I_SYS_STAT:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <sys/stat.h>.
+  */
+ #define       I_SYS_STAT              /**/
+ /* I_VALUES:
+  *    This symbol, if defined, indicates to the C program that it should
+  *    include <values.h> to get definition of symbols like MINFLOAT or
+  *    MAXLONG, i.e. machine dependant limitations.  Probably, you
+  *    should use <limits.h> instead, if it is available.
+  */
+ /*#define I_VALUES            /**/
+ /* Free_t:
+  *    This variable contains the return type of free().  It is usually
+  * void, but occasionally int.
+  */
+ /* Malloc_t:
+  *    This symbol is the type of pointer returned by malloc and realloc.
+  */
+ #define Malloc_t void *                       /**/
+ #define Free_t void                   /**/
+ /* MYMALLOC:
+  *    This symbol, if defined, indicates that we're using our own malloc.
+  */
+ /*#define MYMALLOC                    /**/
+ /* OLDARCHLIB:
+  *    This variable, if defined, holds the name of the directory in
+  *    which the user has perl5.000 or perl5.001 architecture-dependent
+  *    public library files for perl5.  For the most part, these
+  *    files will work with 5.002 (and later), but that is not
+  *    guaranteed.
+  */
+ /* OLDARCHLIB_EXP:
+  *    This symbol contains the ~name expanded version of OLDARCHLIB, to be
+  *    used in programs that are not prepared to deal with ~ expansion at 
+  *    run-time.
+  */
+ /*#define OLDARCHLIB ""               /**/
+ /*#define OLDARCHLIB_EXP ""           /**/
+ /* PRIVLIB:
+  *    This symbol contains the name of the private library for this package.
+  *    The library is private in the sense that it needn't be in anyone's
+  *    execution path, but it should be accessible by the world.  The program
+  *    should be prepared to do ~ expansion.
+  */
+ /* PRIVLIB_EXP:
+  *    This symbol contains the ~name expanded version of PRIVLIB, to be used
+  *    in programs that are not prepared to deal with ~ expansion at run-time.
+  */
+ #define PRIVLIB "c:\\perl\\lib"               /**/
+ #define PRIVLIB_EXP "c:\\perl\\lib"           /**/
+ /* SH_PATH:
+  *    This symbol contains the full pathname to the shell used on this
+  *    on this system to execute Bourne shell scripts.  Usually, this will be
+  *    /bin/sh, though it's possible that some systems will have /bin/ksh,
+  *    /bin/pdksh, /bin/ash, /bin/bash, or even something such as
+  *    D:/bin/sh.exe.
+  */
++#define SH_PATH "cmd /x /c"  /**/
+ /* SIG_NAME:
+  *    This symbol contains a list of signal names in order of
+  *    signal number. This is intended
+  *    to be used as a static array initialization, like this:
+  *            char *sig_name[] = { SIG_NAME };
+  *    The signals in the list are separated with commas, and each signal
+  *    is surrounded by double quotes. There is no leading SIG in the signal
+  *    name, i.e. SIGQUIT is known as "QUIT".
+  *    Gaps in the signal numbers (up to NSIG) are filled in with NUMnn,
+  *    etc., where nn is the actual signal number (e.g. NUM37).
+  *    The signal number for sig_name[i] is stored in sig_num[i].
+  *    The last element is 0 to terminate the list with a NULL.  This
+  *    corresponds to the 0 at the end of the sig_num list.
+  */
+ /* SIG_NUM:
+  *    This symbol contains a list of signal numbers, in the same order as the
+  *    SIG_NAME list. It is suitable for static array initialization, as in:
+  *            int sig_num[] = { SIG_NUM };
+  *    The signals in the list are separated with commas, and the indices
+  *    within that list and the SIG_NAME list match, so it's easy to compute
+  *    the signal name from a number or vice versa at the price of a small
+  *    dynamic linear lookup. 
+  *    Duplicates are allowed, but are moved to the end of the list.
+  *    The signal number corresponding to sig_name[i] is sig_number[i].
+  *    if (i < NSIG) then sig_number[i] == i.  
+  *    The last element is 0, corresponding to the 0 at the end of
+  *    the sig_name list.
+  */
+ #define SIG_NAME "ZERO","HUP","INT","QUIT","ILL","TRAP","ABRT","EMT","FPE","KILL","BUS","SEGV","SYS","PIPE","ALRM","TERM","USR1","USR2","CHLD","PWR","WINCH","URG","IO","STOP","TSTP","CONT","TTIN","TTOU","VTALRM","PROF","XCPU","XFSZ","WAITING","LWP","FREEZE","THAW","RTMIN","NUM37","NUM38","NUM39","NUM40","NUM41","NUM42","RTMAX","IOT","CLD","POLL",0 /**/
+ #define SIG_NUM 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,6,18,22,0   /**/
+ /* SITEARCH:
+  *    This symbol contains the name of the private library for this package.
+  *    The library is private in the sense that it needn't be in anyone's
+  *    execution path, but it should be accessible by the world.  The program
+  *    should be prepared to do ~ expansion.
+  *    The standard distribution will put nothing in this directory.
+  *    Individual sites may place their own extensions and modules in
+  *    this directory.
+  */
+ /* SITEARCH_EXP:
+  *    This symbol contains the ~name expanded version of SITEARCH, to be used
+  *    in programs that are not prepared to deal with ~ expansion at run-time.
+  */
+ #define SITEARCH "c:\\perl\\lib\\site"                /**/
+ #define SITEARCH_EXP "c:\\perl\\lib\\site"            /**/
+ /* SITELIB:
+  *    This symbol contains the name of the private library for this package.
+  *    The library is private in the sense that it needn't be in anyone's
+  *    execution path, but it should be accessible by the world.  The program
+  *    should be prepared to do ~ expansion.
+  *    The standard distribution will put nothing in this directory.
+  *    Individual sites may place their own extensions and modules in
+  *    this directory.
+  */
+ /* SITELIB_EXP:
+  *    This symbol contains the ~name expanded version of SITELIB, to be used
+  *    in programs that are not prepared to deal with ~ expansion at run-time.
+  */
+ #define SITELIB "c:\\perl\\lib\\site"         /**/
+ #define SITELIB_EXP "c:\\perl\\lib\\site"             /**/
+ /* STARTPERL:
+  *    This variable contains the string to put in front of a perl
+  *    script to make sure (one hopes) that it runs with perl and not
+  *    some shell.
+  */
+ #define STARTPERL "#perl"             /**/
+ /* USE_PERLIO:
+  *    This symbol, if defined, indicates that the PerlIO abstraction should
+  *    be used throughout.  If not defined, stdio should be
+  *    used in a fully backward compatible manner.
+  */
+ /*#define     USE_PERLIO              /**/
+ /* VOIDFLAGS:
+  *    This symbol indicates how much support of the void type is given by this
+  *    compiler.  What various bits mean:
+  *
+  *        1 = supports declaration of void
+  *        2 = supports arrays of pointers to functions returning void
+  *        4 = supports comparisons between pointers to void functions and
+  *                addresses of void functions
+  *        8 = suports declaration of generic void pointers
+  *
+  *    The package designer should define VOIDUSED to indicate the requirements
+  *    of the package.  This can be done either by #defining VOIDUSED before
+  *    including config.h, or by defining defvoidused in Myinit.U.  If the
+  *    latter approach is taken, only those flags will be tested.  If the
+  *    level of void support necessary is not present, defines void to int.
+  */
+ #ifndef VOIDUSED
+ #define VOIDUSED 15
+ #endif
+ #define VOIDFLAGS 15
+ #if (VOIDFLAGS & VOIDUSED) != VOIDUSED
+ #define void int              /* is void to be avoided? */
+ #define M_VOID                        /* Xenix strikes again */
+ #endif
+ #endif
+ #include <win32.h>
+ #ifndef DEBUGGING
+ #define DEBUGGING
+ #endif
Simple merge
index 0000000,4696dcb..b91fffc
mode 000000,100644..100644
--- /dev/null
@@@ -1,0 -1,596 +1,586 @@@
 -PL2BAT=bin\pl2bat.pl
 -GLOBBAT = bin\perlglob.bat
+ #
+ # Makefile to build perl on Windowns NT using Microsoft NMAKE.
+ #
+ #
+ # This is set up to build a perl.exe that runs off a shared library
+ # (perl.dll).  Also makes individual DLLs for the XS extensions.
+ #
+ #
+ # Set these to wherever you want "nmake install" to put your
+ # newly built perl.
+ INST_DRV=c:
+ INST_TOP=$(INST_DRV)\perl
+ #
+ # uncomment one if you are using Visual C++ 2.x or Borland
+ # comment out both if you are using Visual C++ 4.x and above
+ #CCTYPE=MSVC20
+ CCTYPE=BORLAND
+ #
+ # uncomment next line if you want debug version of perl (big,slow)
+ #CFG=Debug
+ #
+ # set the install locations of the compiler include/libraries
+ #CCHOME = f:\msdev\vc
+ CCHOME = D:\bc5
+ CCINCDIR = $(CCHOME)\include
+ CCLIBDIR = $(CCHOME)\lib
+ #
+ # set this to point to cmd.exe (only needed if you use some
+ # alternate shell that doesn't grok cmd.exe style commands)
+ SHELL = g:\winnt\system32\cmd.exe
+ #
+ # set this to your email address (perl will guess a value from
+ # from your loginname and your hostname, which may not be right)
+ #EMAIL = 
+ ##################### CHANGE THESE ONLY IF YOU MUST #####################
+ #
+ # Programs to compile, build .lib files and link
+ #
+ .USESHELL :
+ .IF "$(CCTYPE)" == "BORLAND"
+ CC = bcc32
+ LINK32 = tlink32
+ LIB32 = tlib
+ IMPLIB = implib
+ #
+ # Options
+ #
+ RUNTIME  = -D_RTLDLL
+ INCLUDES = -I.\include -I. -I.. -I$(CCINCDIR)
+ #PCHFLAGS = -H -H$(INTDIR)\bcmoduls.pch 
+ DEFINES  = -DWIN32 -DPERLDLL
+ SUBSYS   = console
+ LIBC = cw32mti.lib
+ LIBFILES = import32.lib $(LIBC) odbc32.lib odbccp32.lib
+ WINIOMAYBE =
+ .IF  "$(CFG)" == "Debug"
+ OPTIMIZE = -v $(RUNTIME)
+ LINK_DBG = -v
+ .ELSE
+ OPTIMIZE = -O $(RUNTIME)
+ LINK_DBG = 
+ .ENDIF
+ CFLAGS   = -w -tWM -tWD $(INCLUDES) $(DEFINES) $(PCHFLAGS) $(OPTIMIZE)
+ LINK_FLAGS  = $(LINK_DBG) -L$(CCLIBDIR)
+ OBJOUT_FLAG = -o
+ .ELSE
+ CC=cl.exe
+ LINK32=link.exe
+ LIB32=$(LINK32) -lib
+ #
+ # Options
+ #
+ .IF "$(RUNTIME)" == ""
+ RUNTIME  = -MD
+ .ENDIF
+ INCLUDES = -I.\include -I. -I..
+ #PCHFLAGS = -Fp$(INTDIR)\vcmoduls.pch -YX 
+ DEFINES  = -DWIN32 -D_CONSOLE -DPERLDLL
+ SUBSYS   = console
+ .IF "$(RUNTIME)" == "-MD"
+ LIBC = msvcrt.lib
+ WINIOMAYBE =
+ .ELSE
+ LIBC = libcmt.lib
+ WINIOMAYBE = win32io.obj
+ .ENDIF
+ .IF  "$(CFG)" == "Debug"
+ .IF "$(CCTYPE)" == "MSVC20"
+ OPTIMIZE = -Od $(RUNTIME) -Z7 -D_DEBUG
+ .ELSE
+ OPTIMIZE = -Od $(RUNTIME)d -Z7 -D_DEBUG
+ .ENDIF
+ LINK_DBG = -debug -pdb:none
+ .ELSE
+ .IF "$(CCTYPE)" == "MSVC20"
+ OPTIMIZE = -Od $(RUNTIME) -DNDEBUG
+ .ELSE
+ OPTIMIZE = -Od $(RUNTIME) -DNDEBUG
+ .ENDIF
+ LINK_DBG = -release
+ .ENDIF
+ # we don't add LIBC here, the compiler do it based on -MD/-MT
+ LIBFILES = oldnames.lib kernel32.lib user32.lib gdi32.lib \
+       winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib \
+       oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib \
+       version.lib odbc32.lib odbccp32.lib
+ CFLAGS   = -nologo -W3 $(INCLUDES) $(DEFINES) $(PCHFLAGS) $(OPTIMIZE)
+ LINK_FLAGS  = -nologo $(LIBFILES) $(LINK_DBG) -machine:I386
+ OBJOUT_FLAG = -Fo
+ .ENDIF
+ #################### do not edit below this line #######################
+ ############# NO USER-SERVICEABLE PARTS BEYOND THIS POINT ##############
+ #
+ # Rules
+ # 
+ .SUFFIXES : 
+ .SUFFIXES : .c .obj .dll .lib .exe
+ .c.obj:
+       $(CC) -c $(CFLAGS) $(OBJOUT_FLAG)$@ $<
+ .IF "$(CCTYPE)" == "BORLAND"
+ .obj.dll:
+       $(LINK32) -Tpd -ap $(LINK_FLAGS) c0d32.obj $<,$@,,$(LIBFILES),$(*B).def
+       $(IMPLIB) $(*B).lib $@
+ .ELSE
+ .obj.dll:
+       $(LINK32) -dll -subsystem:windows -implib:$(*B).lib -def:$(*B).def \
+           -out:$@ $(LINK_FLAGS) $< $(LIBPERL)  
+ .ENDIF
+ #
+ INST_BIN=$(INST_TOP)\bin
+ INST_LIB=$(INST_TOP)\lib
+ INST_POD=$(INST_LIB)\pod
+ INST_HTML=$(INST_POD)\html
+ LIBDIR=..\lib
+ EXTDIR=..\ext
+ PODDIR=..\pod
+ EXTUTILSDIR=$(LIBDIR)\extutils
+ #
+ # various targets
+ PERLIMPLIB=..\perl.lib
+ MINIPERL=..\miniperl.exe
+ PERLDLL=..\perl.dll
+ PERLEXE=..\perl.exe
+ GLOBEXE=..\perlglob.exe
+ CONFIGPM=..\lib\Config.pm
+ MINIMOD=..\lib\ExtUtils\Miniperl.pm
 -$(GLOBBAT) : ..\lib\File\DosGlob.pm $(MINIPERL)
 -      $(MINIPERL) $(PL2BAT) - < ..\lib\File\DosGlob.pm > $(GLOBBAT)
++PL2BAT=bin\PL2BAT.BAT
++GLOBBAT = perlglob.bat
+ .IF "$(CCTYPE)" == "BORLAND"
+ # Borland wildargs is incompatible with MS setargv
+ CFGSH_TMPL = config.bc
+ CFGH_TMPL = config_H.bc
+ # Borland's perl.exe will work on W95, so we don't make this
+ .ELSE
+ MAKE = nmake -nologo
+ CFGSH_TMPL = config.vc
+ CFGH_TMPL = config_H.vc
+ PERL95EXE=..\perl95.exe
+ .ENDIF
+ XCOPY=xcopy /f /r /i /d
+ RCOPY=xcopy /f /r /i /e /d
+ #NULL=
+ #
+ # filenames given to xsubpp must have forward slashes (since it puts
+ # full pathnames in #line strings)
+ XSUBPP=..\$(MINIPERL) -I..\..\lib ..\$(EXTUTILSDIR)\xsubpp -C++ -prototypes
+ CORE_C=       ..\av.c         \
+       ..\deb.c        \
+       ..\doio.c       \
+       ..\doop.c       \
+       ..\dump.c       \
+       ..\globals.c    \
+       ..\gv.c         \
+       ..\hv.c         \
+       ..\mg.c         \
+       ..\op.c         \
+       ..\perl.c       \
+       ..\perlio.c     \
+       ..\perly.c      \
+       ..\pp.c         \
+       ..\pp_ctl.c     \
+       ..\pp_hot.c     \
+       ..\pp_sys.c     \
+       ..\regcomp.c    \
+       ..\regexec.c    \
+       ..\run.c        \
+       ..\scope.c      \
+       ..\sv.c         \
+       ..\taint.c      \
+       ..\toke.c       \
+       ..\universal.c  \
+       ..\util.c
+ CORE_OBJ= ..\av.obj   \
+       ..\deb.obj      \
+       ..\doio.obj     \
+       ..\doop.obj     \
+       ..\dump.obj     \
+       ..\globals.obj  \
+       ..\gv.obj       \
+       ..\hv.obj       \
+       ..\mg.obj       \
+       ..\op.obj       \
+       ..\perl.obj     \
+       ..\perlio.obj   \
+       ..\perly.obj    \
+       ..\pp.obj       \
+       ..\pp_ctl.obj   \
+       ..\pp_hot.obj   \
+       ..\pp_sys.obj   \
+       ..\regcomp.obj  \
+       ..\regexec.obj  \
+       ..\run.obj      \
+       ..\scope.obj    \
+       ..\sv.obj       \
+       ..\taint.obj    \
+       ..\toke.obj     \
+       ..\universal.obj\
+       ..\util.obj
+ WIN32_C = perllib.c \
+       win32.c \
+       win32io.c \
+       win32sck.c
+ WIN32_OBJ = win32.obj \
+       win32io.obj \
+       win32sck.obj
+ DLL_OBJ = perllib.obj $(DYNALOADER).obj
+ CORE_H = ..\av.h      \
+       ..\cop.h        \
+       ..\cv.h         \
+       ..\dosish.h     \
+       ..\embed.h      \
+       ..\form.h       \
+       ..\gv.h         \
+       ..\handy.h      \
+       ..\hv.h         \
+       ..\mg.h         \
+       ..\nostdio.h    \
+       ..\op.h         \
+       ..\opcode.h     \
+       ..\perl.h       \
+       ..\perlio.h     \
+       ..\perlsdio.h   \
+       ..\perlsfio.h   \
+       ..\perly.h      \
+       ..\pp.h         \
+       ..\proto.h      \
+       ..\regexp.h     \
+       ..\scope.h      \
+       ..\sv.h         \
+       ..\unixish.h    \
+       ..\util.h       \
+       ..\XSUB.h       \
+       .\config.h      \
+       ..\EXTERN.h     \
+       .\include\dirent.h      \
+       .\include\netdb.h       \
+       .\include\sys\socket.h  \
+       .\win32.h
+ EXTENSIONS=DynaLoader Socket IO Fcntl Opcode SDBM_File
+ DYNALOADER=$(EXTDIR)\DynaLoader\DynaLoader
+ SOCKET=$(EXTDIR)\Socket\Socket
+ FCNTL=$(EXTDIR)\Fcntl\Fcntl
+ OPCODE=$(EXTDIR)\Opcode\Opcode
+ SDBM_FILE=$(EXTDIR)\SDBM_File\SDBM_File
+ IO=$(EXTDIR)\IO\IO
+ SOCKET_DLL=..\lib\auto\Socket\Socket.dll
+ FCNTL_DLL=..\lib\auto\Fcntl\Fcntl.dll
+ OPCODE_DLL=..\lib\auto\Opcode\Opcode.dll
+ SDBM_FILE_DLL=..\lib\auto\SDBM_File\SDBM_File.dll
+ IO_DLL=..\lib\auto\IO\IO.dll
+ STATICLINKMODULES=DynaLoader
+ DYNALOADMODULES=      \
+       $(SOCKET_DLL)   \
+       $(FCNTL_DLL)    \
+       $(OPCODE_DLL)   \
+       $(SDBM_FILE_DLL)\
+       $(IO_DLL)
+ POD2HTML=$(PODDIR)\pod2html
+ POD2MAN=$(PODDIR)\pod2man
+ POD2LATEX=$(PODDIR)\pod2latex
+ POD2TEXT=$(PODDIR)\pod2text
+ #
+ # Top targets
+ #
+ all: $(PERLEXE) $(PERL95EXE) $(GLOBEXE) $(DYNALOADMODULES) $(MINIMOD) $(GLOBBAT)
+ $(DYNALOADER).obj : $(DYNALOADER).c $(CORE_H) $(EXTDIR)\DynaLoader\dlutils.c
+ #------------------------------------------------------------
+ $(GLOBEXE): perlglob.obj
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(CC) -c -w -v -tWM -I$(CCINCDIR) perlglob.c
+       $(LINK32) -Tpe -ap $(LINK_FLAGS) c0x32.obj perlglob.obj \
+           $(CCLIBDIR)\32BIT\wildargs.obj,$@,,import32.lib cw32mt.lib,
+ .ELSE
+       $(LINK32) $(LINK_FLAGS) -out:$@ -subsystem:$(SUBSYS) perlglob.obj setargv.obj 
+ .ENDIF
 -          "cf_email=$(EMAIL)" "libs=$(LIBFILES:f)" "incpath=$(CCINCDIR)" \
++perlglob.bat : ..\lib\File\DosGlob.pm $(MINIPERL)
++      $(MINIPERL) $(PL2BAT) - < ..\lib\File\DosGlob.pm > $(*B).bat
+ perlglob.obj  : perlglob.c
+ ..\miniperlmain.obj : ..\miniperlmain.c $(CORE_H)
+ config.w32 : $(CFGSH_TMPL)
+       copy $(CFGSH_TMPL) config.w32
+ .\config.h : $(CFGSH_TMPL)
+       -del /f config.h
+       copy $(CFGH_TMPL) config.h
+ ..\config.sh : config.w32 $(MINIPERL) config_sh.PL
+       $(MINIPERL) -I..\lib config_sh.PL "INST_DRV=$(INST_DRV)" \
+           "INST_TOP=$(INST_TOP)" "cc=$(CC)" "ccflags=$(RUNTIME) -DWIN32" \
 -      cd ..\pod && $(MAKE) -f ..\win32\pod.mak checkpods \
 -              pod2html pod2latex pod2man pod2text
 -      cd ..\pod && $(XCOPY) *.bat ..\win32\bin\*.*
++          "cf_email=$(EMAIL)" "libs=$(LIBFILES:f)" \
+           "libpth=$(strip $(CCLIBDIR) $(LIBFILES:d))" "libc=$(LIBC)" \
+           config.w32 > ..\config.sh
+ $(CONFIGPM) : $(MINIPERL) ..\config.sh config_h.PL ..\minimod.pl
+       cd .. && miniperl configpm
+       if exist lib\* $(RCOPY) lib\*.* ..\lib\$(NULL)
+       $(XCOPY) ..\*.h ..\lib\CORE\*.*
+       $(XCOPY) *.h ..\lib\CORE\*.*
+       $(RCOPY) include ..\lib\CORE\*.*
+       $(MINIPERL) -I..\lib config_h.PL || $(MAKE) CCTYPE=$(CCTYPE) \
+           RUNTIME=$(RUNTIME) CFG=$(CFG) $(CONFIGPM)
+ $(MINIPERL) : ..\miniperlmain.obj $(CORE_OBJ) $(WIN32_OBJ)
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(LINK32) -Tpe -ap $(LINK_FLAGS) \
+           @$(mktmp c0x32.obj ..\miniperlmain.obj \
+               $(CORE_OBJ:s,\,\\) $(WIN32_OBJ:s,\,\\),$@,,$(LIBFILES),)
+ .ELSE
+       $(LINK32) -subsystem:console -out:$@ \
+           @$(mktmp $(LINK_FLAGS) ..\miniperlmain.obj \
+               $(CORE_OBJ:s,\,\\) $(WIN32_OBJ:s,\,\\))
+ .ENDIF
+ $(WIN32_OBJ) : $(CORE_H)
+ $(CORE_OBJ)  : $(CORE_H)
+ $(DLL_OBJ)   : $(CORE_H) 
+ perldll.def : $(MINIPERL) $(CONFIGPM)
+       $(MINIPERL) -w makedef.pl $(CCTYPE) > perldll.def
+ $(PERLDLL): perldll.def $(CORE_OBJ) $(WIN32_OBJ) $(DLL_OBJ)
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(LINK32) -Tpd -ap $(LINK_FLAGS) \
+           @$(mktmp c0d32.obj $(CORE_OBJ:s,\,\\) \
+               $(WIN32_OBJ:s,\,\\) $(DLL_OBJ:s,\,\\)\n \
+               $@,\n \
+               $(LIBFILES)\n \
+               perldll.def\n)
+       $(IMPLIB) $*.lib $@
+ .ELSE
+       $(LINK32) -dll -def:perldll.def -out:$@ \
+           @$(mktmp $(LINK_FLAGS) $(CORE_OBJ:s,\,\\) \
+               $(WIN32_OBJ:s,\,\\) $(DLL_OBJ:s,\,\\))
+ .ENDIF
+       $(XCOPY) $(PERLIMPLIB) ..\lib\CORE
+ perl.def  : $(MINIPERL) makeperldef.pl
+       $(MINIPERL) -I..\lib makeperldef.pl $(NULL) > perl.def
+ $(MINIMOD) : $(MINIPERL) ..\minimod.pl
+       cd .. && miniperl minimod.pl > lib\ExtUtils\Miniperl.pm
+ perlmain.c : runperl.c 
+       copy runperl.c perlmain.c
+ perlmain.obj : perlmain.c
+       $(CC) $(CFLAGS) -UPERLDLL -c perlmain.c
+ $(PERLEXE): $(PERLDLL) $(CONFIGPM) perlmain.obj  
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(LINK32) -Tpe -ap $(LINK_FLAGS) \
+           @$(mktmp c0x32.obj perlmain.obj $(WINIOMAYBE)\n \
+           $@,\n \
+           $(PERLIMPLIB) $(LIBFILES)\n)
+ .ELSE
+       $(LINK32) -subsystem:console -out:perl.exe $(LINK_FLAGS) \
+           perlmain.obj $(WINIOMAYBE) $(PERLIMPLIB) 
+       copy perl.exe $@
+       del perl.exe
+ .ENDIF
+       copy splittree.pl .. 
+       $(MINIPERL) -I..\lib ..\splittree.pl "../LIB" "../LIB/auto"
+       attrib -r ..\t\*.*
+       copy test ..\t
+ .IF "$(CCTYPE)" != "BORLAND"
+ perl95.c : runperl.c 
+       copy runperl.c perl95.c
+ perl95.obj : perl95.c
+       $(CC) $(CFLAGS) -MT -UPERLDLL -c perl95.c
+ win32iomt.obj : win32io.c
+       $(CC) $(CFLAGS) -MT -c $(OBJOUT_FLAG)win32iomt.obj win32io.c
+ $(PERL95EXE): $(PERLDLL) $(CONFIGPM) perl95.obj win32iomt.obj
+       $(LINK32) -subsystem:console -out:perl95.exe $(LINK_FLAGS) \
+           perl95.obj win32iomt.obj $(PERLIMPLIB) 
+       copy perl95.exe $@
+       del perl95.exe
+ .ENDIF
+ $(DYNALOADER).c: $(MINIPERL) $(EXTDIR)\DynaLoader\dl_win32.xs $(CONFIGPM)
+       if not exist ..\lib\auto mkdir ..\lib\auto
+       $(XCOPY) $(EXTDIR)\$(*B)\$(*B).pm $(LIBDIR)\$(NULL)
+       cd $(EXTDIR)\$(*B) && $(XSUBPP) dl_win32.xs > $(*B).c
+       $(XCOPY) $(EXTDIR)\$(*B)\dlutils.c .
+ $(EXTDIR)\DynaLoader\dl_win32.xs: dl_win32.xs
+       copy dl_win32.xs $(EXTDIR)\DynaLoader\dl_win32.xs
+ $(IO_DLL): $(PERLEXE) $(CONFIGPM) $(IO).xs
+       cd $(EXTDIR)\$(*B) && \
+       ..\..\miniperl -I..\..\lib Makefile.PL INSTALLDIRS=perl
+       cd $(EXTDIR)\$(*B) && $(MAKE)
+ $(SDBM_FILE_DLL) : $(PERLEXE) $(SDBM_FILE).xs
+       cd $(EXTDIR)\$(*B) && \
+       ..\..\miniperl -I..\..\lib Makefile.PL INSTALLDIRS=perl
+       cd $(EXTDIR)\$(*B) && $(MAKE)
+ $(FCNTL_DLL): $(PERLEXE) $(FCNTL).xs
+       cd $(EXTDIR)\$(*B) && \
+       ..\..\miniperl -I..\..\lib Makefile.PL INSTALLDIRS=perl
+       cd $(EXTDIR)\$(*B) && $(MAKE)
+ $(OPCODE_DLL): $(PERLEXE) $(OPCODE).xs
+       cd $(EXTDIR)\$(*B) && \
+       ..\..\miniperl -I..\..\lib Makefile.PL INSTALLDIRS=perl
+       cd $(EXTDIR)\$(*B) && $(MAKE)
+ $(SOCKET_DLL): $(SOCKET).xs $(PERLEXE)
+       cd $(EXTDIR)\$(*B) && \
+       ..\..\miniperl -I..\..\lib Makefile.PL INSTALLDIRS=perl
+       cd $(EXTDIR)\$(*B) && $(MAKE)
+ doc: $(PERLEXE)
 -      $(XCOPY) ..\utils\*.bat bin\*.*
 -      $(PERLEXE) $(PL2BAT) bin\network.pl bin\www.pl bin\runperl.pl \
 -                      bin\pl2bat.pl
+       copy ..\README.win32 ..\pod\perlwin32.pod
+       $(PERLEXE) ..\installhtml --podroot=.. --htmldir=./html \
+           --podpath=pod:lib:ext:utils --htmlroot="//$(INST_HTML:s,:,|,)" \
+           --libpod=perlfunc:perlguts:perlvar:perlrun:perlop --recurse
+ utils: $(PERLEXE)
+       cd ..\utils && $(MAKE) PERL=$(MINIPERL)
+       cd ..\utils && $(PERLEXE) ..\win32\$(PL2BAT) h2ph splain perlbug \
+               pl2pm c2ph h2xs perldoc pstruct
 -      -del /f ..\config.sh ..\splittree.pl perlmain.c dlutils.c config.h.new
 -.IF "$(PERL95EXE)" != ""
 -      -del /f perl95.c
 -.ENDIF
 -      -del /f bin\*.bat
++      cd ..\utils && $(XCOPY) *.bat ..\win32\bin\*.*
+ distclean: clean
+       -del /f $(MINIPERL) $(PERLEXE) $(PERLDLL) $(GLOBEXE) \
+               $(PERLIMPLIB) ..\miniperl.lib $(MINIMOD)
+       -del /f *.def *.map
+       -del /f $(SOCKET_DLL) $(IO_DLL) $(SDBM_FILE_DLL) $(FCNTL_DLL) \
+               $(OPCODE_DLL)
+       -del /f $(SOCKET).c $(IO).c $(SDBM_FILE).c $(FCNTL).c $(OPCODE).c \
+               $(DYNALOADER).c
+       -del /f $(PODDIR)\*.html
+       -del /f $(PODDIR)\*.bat
 -      $(XCOPY) bin\*.bat $(INST_BIN)\*.*
+       -cd $(EXTDIR) && del /s *.lib *.def *.map *.bs Makefile *.obj pm_to_blib
+       -rmdir /s /q ..\lib\auto
+       -rmdir /s /q ..\lib\CORE
+ install : all doc utils
+       if not exist $(INST_TOP) mkdir $(INST_TOP)
+       echo I $(INST_TOP) L $(LIBDIR)
+       $(XCOPY) $(PERLEXE) $(INST_BIN)\*.*
+ .IF "$(PERL95EXE)" != ""
+       $(XCOPY) $(PERL95EXE) $(INST_BIN)\*.*
+ .ENDIF
+       $(XCOPY) $(GLOBEXE) $(INST_BIN)\*.*
++      $(XCOPY) $(GLOBBAT) $(INST_BIN)\*.*
+       $(XCOPY) $(PERLDLL) $(INST_BIN)\*.*
 -      -@erase ..\*.obj ..\*.lib ..\*.exp *.obj *.lib *.exp
 -      -@erase ..\t\*.exe ..\t\*.dll ..\t\*.bat
++      $(XCOPY) bin\*.* $(INST_BIN)\*.*
+       $(RCOPY) ..\lib $(INST_LIB)\*.*
+       $(XCOPY) ..\pod\*.bat $(INST_BIN)\*.*
+       $(XCOPY) ..\pod\*.pod $(INST_POD)\*.*
+       $(RCOPY) html\*.* $(INST_HTML)\*.*
+ inst_lib : $(CONFIGPM)
+       copy splittree.pl .. 
+       $(MINIPERL) -I..\lib ..\splittree.pl "../LIB" "../LIB/auto"
+       $(RCOPY) ..\lib $(INST_LIB)\*.*
+ minitest : $(MINIPERL) $(GLOBEXE) $(CONFIGPM)
+       $(XCOPY) $(MINIPERL) ..\t\perl.exe
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(XCOPY) $(GLOBBAT) ..\t\$(NULL)
+ .ELSE
+       $(XCOPY) $(GLOBEXE) ..\t\$(NULL)
+ .ENDIF
+       attrib -r ..\t\*.*
+       copy test ..\t
+       cd ..\t && \
+       $(MINIPERL) -I..\lib test base/*.t comp/*.t cmd/*.t io/*.t op/*.t pragma/*.t
+ test : all
+       $(XCOPY) $(PERLEXE) ..\t\$(NULL)
+       $(XCOPY) $(PERLDLL) ..\t\$(NULL)
+ .IF "$(CCTYPE)" == "BORLAND"
+       $(XCOPY) $(GLOBBAT) ..\t\$(NULL)
+ .ELSE
+       $(XCOPY) $(GLOBEXE) ..\t\$(NULL)
+ .ENDIF
+       cd ..\t && $(PERLEXE) -I..\lib harness
+ clean : 
+       -@erase miniperlmain.obj
+       -@erase $(MINIPERL)
+       -@erase perlglob.obj
+       -@erase perlmain.obj
+       -@erase config.w32
+       -@erase /f config.h
+       -@erase $(GLOBEXE)
+       -@erase $(PERLEXE)
+       -@erase $(PERLDLL)
+       -@erase $(CORE_OBJ)
+       -@erase $(WIN32_OBJ)
+       -@erase $(DLL_OBJ)
++      -@erase ..\*.obj *.obj ..\*.lib ..\*.exp
+       -@erase *.ilk
+       -@erase *.pdb