X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dosish.h;h=634efa7bc37114ae814480242914eb455c4413ff;hb=1059054db273fce406f731966b935f417b38dbd5;hp=0b0a35e073f051250945810888e799824a313ed8;hpb=4d1ff10ffec86208b0da135b87c76b89e61c866e;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/dosish.h b/dosish.h
index 0b0a35e..634efa7 100644
--- a/dosish.h
+++ b/dosish.h
@@ -1,3 +1,12 @@
+/*    dosish.h
+ *
+ *    Copyright (c) 1997-2002, Larry Wall
+ *
+ *    You may distribute under the terms of either the GNU General Public
+ *    License or the Artistic License, as specified in the README file.
+ *
+ */
+
 #define ABORT() abort();
 
 #ifndef SH_PATH
@@ -13,6 +22,7 @@
 #  define HAS_UTIME
 #  define HAS_KILL
    char *djgpp_pathexp (const char*);
+   void Perl_DJGPP_init (int *argcp,char ***argvp);
 #  if (DJGPP==2 && DJGPP_MINOR < 2)
 #    define NO_LOCALECONV_MON_THOUSANDS_SEP
 #  endif
@@ -89,7 +99,7 @@
  *	as the first line of a Perl program designed to be executed directly
  *	by name, instead of the standard Unix #!.  If ALTERNATE_SHEBANG
  *	begins with a character other then #, then Perl will only treat
- *	it as a command line if if finds the string "perl" in the first
+ *	it as a command line if it finds the string "perl" in the first
  *	word; otherwise it's treated as the first line of code in the script.
  *	(IOW, Perl won't hand off to another interpreter via an alternate
  *	shebang sequence that might be legal Perl code.)