diff options
| -rw-r--r-- | XSUB.h | 9 | ||||
| -rw-r--r-- | cc_runtime.h | 9 | ||||
| -rw-r--r-- | dosish.h | 9 | ||||
| -rw-r--r-- | embed.h | 16 | ||||
| -rwxr-xr-x | embed.pl | 81 | ||||
| -rw-r--r-- | embedvar.h | 17 | ||||
| -rw-r--r-- | fakesdio.h | 9 | ||||
| -rw-r--r-- | fakethr.h | 9 | ||||
| -rw-r--r-- | global.sym | 7 | ||||
| -rw-r--r-- | globals.c | 9 | ||||
| -rw-r--r-- | keywords.h | 9 | ||||
| -rwxr-xr-x | keywords.pl | 12 | ||||
| -rw-r--r-- | miniperlmain.c | 9 | ||||
| -rw-r--r-- | nostdio.h | 9 | ||||
| -rw-r--r-- | opcode.h | 16 | ||||
| -rwxr-xr-x | opcode.pl | 33 | ||||
| -rw-r--r-- | opnames.h | 17 | ||||
| -rw-r--r-- | patchlevel.h | 9 | ||||
| -rw-r--r-- | perl.h | 1 | ||||
| -rw-r--r-- | perlapi.c | 17 | ||||
| -rw-r--r-- | perlapi.h | 17 | ||||
| -rw-r--r-- | perlio.h | 9 | ||||
| -rw-r--r-- | perlsdio.h | 9 | ||||
| -rw-r--r-- | perlsfio.h | 9 | ||||
| -rw-r--r-- | perlvars.h | 9 | ||||
| -rw-r--r-- | proto.h | 7 | ||||
| -rw-r--r-- | regcomp.h | 6 | ||||
| -rw-r--r-- | regexp.h | 6 | ||||
| -rw-r--r-- | scope.h | 9 | ||||
| -rw-r--r-- | sharedsv.h | 9 | ||||
| -rw-r--r-- | taint.c | 9 | ||||
| -rw-r--r-- | thrdvar.h | 9 | ||||
| -rw-r--r-- | thread.h | 9 | ||||
| -rw-r--r-- | universal.c | 9 | ||||
| -rw-r--r-- | unixish.h | 9 | ||||
| -rw-r--r-- | xsutils.c | 9 |
36 files changed, 403 insertions, 48 deletions
@@ -1,3 +1,12 @@ +/* XSUB.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. + * + */ + #ifndef _INC_PERL_XSUB_H #define _INC_PERL_XSUB_H 1 diff --git a/cc_runtime.h b/cc_runtime.h index 799bf463d8..b1fc5b52b7 100644 --- a/cc_runtime.h +++ b/cc_runtime.h @@ -1,3 +1,12 @@ +/* cc_runtime.h + * + * Copyright (c) 1998-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 DOOP(ppname) PUTBACK; PL_op = ppname(aTHX); SPAGAIN #define CCPP(s) OP * s(pTHX) @@ -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 @@ -1,7 +1,15 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * embed.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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* (Doing namespace management portably in C is really gross.) */ @@ -169,6 +169,13 @@ sub write_global_sym { walk_table(\&write_protos, 'proto.h', <<'EOT'); /* + * proto.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. + * * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! * This file is autogenerated from data in embed.pl. Edit that file * and run 'make regen_headers' to effect changes. @@ -178,6 +185,13 @@ EOT walk_table(\&write_global_sym, 'global.sym', <<'EOT'); # +# global.sym +# +# 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. +# # !!!!!!! DO NOT EDIT THIS FILE !!!!!!! # This file is autogenerated from data in embed.pl. Edit that file # and run 'make regen_headers' to effect changes. @@ -287,10 +301,18 @@ unlink 'embed.h'; open(EM, '> embed.h') or die "Can't create embed.h: $!\n"; print EM <<'END'; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * embed.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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* (Doing namespace management portably in C is really gross.) */ @@ -516,10 +538,19 @@ open(EM, '> embedvar.h') or die "Can't create embedvar.h: $!\n"; print EM <<'END'; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * embedvar.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* (Doing namespace management portably in C is really gross.) */ @@ -659,10 +690,19 @@ open(CAPI, '> perlapi.c') or die "Can't create perlapi.c: $!\n"; open(CAPIH, '> perlapi.h') or die "Can't create perlapi.h: $!\n"; print CAPIH <<'EOT'; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * perlapi.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* declare accessor functions for Perl variables */ #ifndef __perlapi_h__ @@ -759,10 +799,19 @@ EOT close CAPIH; print CAPI <<'EOT'; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * perlapi.c + * + * 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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ #include "EXTERN.h" #include "perl.h" diff --git a/embedvar.h b/embedvar.h index c6eb5fa7ae..d0fba96b4e 100644 --- a/embedvar.h +++ b/embedvar.h @@ -1,7 +1,16 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * embedvar.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* (Doing namespace management portably in C is really gross.) */ diff --git a/fakesdio.h b/fakesdio.h index 479123242f..8ef89e9ca5 100644 --- a/fakesdio.h +++ b/fakesdio.h @@ -1,3 +1,12 @@ +/* fakestdio.h + * + * Copyright (c) 2000-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. + * + */ + /* * This is "source level" stdio compatibility mode. * We try and #define stdio functions in terms of PerlIO. @@ -1,3 +1,12 @@ +/* fakethr.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. + * + */ + typedef int perl_mutex; typedef int perl_key; diff --git a/global.sym b/global.sym index e64508b793..f73a5005c4 100644 --- a/global.sym +++ b/global.sym @@ -1,4 +1,11 @@ # +# global.sym +# +# 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. +# # !!!!!!! DO NOT EDIT THIS FILE !!!!!!! # This file is autogenerated from data in embed.pl. Edit that file # and run 'make regen_headers' to effect changes. @@ -1,3 +1,12 @@ +/* globals.c + * + * 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. + * + */ + #include "INTERN.h" #define PERL_IN_GLOBALS_C #include "perl.h" diff --git a/keywords.h b/keywords.h index e894930f7a..744330f526 100644 --- a/keywords.h +++ b/keywords.h @@ -1,3 +1,12 @@ +/* + * keywords.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 KEY_NULL 0 #define KEY___FILE__ 1 #define KEY___LINE__ 2 diff --git a/keywords.pl b/keywords.pl index 355b05ed05..00c067c40a 100755 --- a/keywords.pl +++ b/keywords.pl @@ -4,6 +4,18 @@ unlink "keywords.h"; open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n"; select KW; +print <<EOM; +/* + * keywords.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. + * + */ +EOM + # Read & print data. $keynum = 0; diff --git a/miniperlmain.c b/miniperlmain.c index f92ea3ee23..e2415d8a53 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -1,3 +1,12 @@ +/* miniperlmain.c + * + * 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. + * + */ + /* * "The Road goes ever on and on, down from the door where it began." */ @@ -1,3 +1,12 @@ +/* nostdio.h + * + * Copyright (c) 1987-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. + * + */ + /* * Strong denial of stdio - make all stdio calls (we can think of) errors */ @@ -1,7 +1,15 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by opcode.pl from its data. Any changes made here - will be lost! -*/ +/* + * opcode.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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by opcode.pl from its data. Any changes made here + * will be lost! + */ #define Perl_pp_i_preinc Perl_pp_preinc #define Perl_pp_i_predec Perl_pp_predec @@ -31,10 +31,18 @@ while (<DATA>) { $i = 0; print <<"END"; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by opcode.pl from its data. Any changes made here - will be lost! -*/ +/* + * opcode.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. + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by opcode.pl from its data. Any changes made here + * will be lost! + */ #define Perl_pp_i_preinc Perl_pp_preinc #define Perl_pp_i_predec Perl_pp_predec @@ -44,10 +52,19 @@ print <<"END"; END print ON <<"END"; -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by opcode.pl from its data. Any changes made here - will be lost! -*/ +/* + * opnames.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by opcode.pl from its data. Any changes made here + * will be lost! + */ typedef enum opcode { END @@ -1,7 +1,16 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by opcode.pl from its data. Any changes made here - will be lost! -*/ +/* + * opnames.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by opcode.pl from its data. Any changes made here + * will be lost! + */ typedef enum opcode { OP_NULL, /* 0 */ diff --git a/patchlevel.h b/patchlevel.h index 54f470e1c7..e24314090a 100644 --- a/patchlevel.h +++ b/patchlevel.h @@ -1,3 +1,12 @@ +/* patchlevel.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. + * + */ + #ifndef __PATCHLEVEL_H_INCLUDED__ /* do not adjust the whitespace! Configure expects the numbers to be @@ -6,6 +6,7 @@ * License or the Artistic License, as specified in the README file. * */ + #ifndef H_PERL #define H_PERL 1 @@ -1,7 +1,16 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * perlapi.c + * + * 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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ #include "EXTERN.h" #include "perl.h" @@ -1,7 +1,16 @@ -/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! - This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, - perlvars.h and thrdvar.h. Any changes made here will be lost! -*/ +/* + * perlapi.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. + * + * + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + * perlvars.h and thrdvar.h. Any changes made here will be lost! + */ /* declare accessor functions for Perl variables */ #ifndef __perlapi_h__ @@ -1,3 +1,12 @@ +/* perlio.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. + * + */ + #ifndef _PERLIO_H #define _PERLIO_H /* diff --git a/perlsdio.h b/perlsdio.h index d09b632228..72ae584d4e 100644 --- a/perlsdio.h +++ b/perlsdio.h @@ -1,3 +1,12 @@ +/* perlsdio.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. + * + */ + #ifdef PERLIO_IS_STDIO #ifdef NETWARE diff --git a/perlsfio.h b/perlsfio.h index ed7ab9726e..1b1b522ed8 100644 --- a/perlsfio.h +++ b/perlsfio.h @@ -1,3 +1,12 @@ +/* perlsfio.h + * + * Copyright (c) 1987-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. + * + */ + /* The next #ifdef should be redundant if Configure behaves ... */ #ifndef FILE #define FILE FILE diff --git a/perlvars.h b/perlvars.h index 606f7a5243..adcc2c097b 100644 --- a/perlvars.h +++ b/perlvars.h @@ -1,3 +1,12 @@ +/* perlvars.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. + * + */ + /****************/ /* Truly global */ /****************/ @@ -1,4 +1,11 @@ /* + * proto.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. + * * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! * This file is autogenerated from data in embed.pl. Edit that file * and run 'make regen_headers' to effect changes. @@ -1,4 +1,10 @@ /* regcomp.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. + * */ typedef OP OP_4tree; /* Will be redefined later. */ @@ -1,4 +1,10 @@ /* regexp.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. + * */ /* @@ -1,3 +1,12 @@ +/* scope.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 SAVEt_ITEM 0 #define SAVEt_SV 1 #define SAVEt_AV 2 diff --git a/sharedsv.h b/sharedsv.h index f82804dba4..42f061022d 100644 --- a/sharedsv.h +++ b/sharedsv.h @@ -1,3 +1,12 @@ +/* sharedsv.h + * + * Copyright (c) 2001-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. + * + */ + #ifdef USE_ITHREADS typedef struct { @@ -1,3 +1,12 @@ +/* taint.c + * + * 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. + * + */ + /* * "...we will have peace, when you and all your works have perished--and * the works of your dark master to whom you would deliver us. You are a @@ -1,3 +1,12 @@ +/* thdrvar.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. + * + */ + /* =head1 Global Variables */ @@ -1,3 +1,12 @@ +/* thread.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. + * + */ + #if defined(USE_5005THREADS) || defined(USE_ITHREADS) #if defined(VMS) diff --git a/universal.c b/universal.c index 53b9e9fb70..b2313f5cd0 100644 --- a/universal.c +++ b/universal.c @@ -1,3 +1,12 @@ +/* universal.c + * + * 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. + * + */ + #include "EXTERN.h" #define PERL_IN_UNIVERSAL_C #include "perl.h" @@ -1,3 +1,12 @@ +/* unixish.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. + * + */ + /* * The following symbols are defined if your operating system supports * functions by that name. All Unixes I know of support them, thus they @@ -1,3 +1,12 @@ +/* xsutils.c + * + * Copyright (c) 1999-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. + * + */ + #include "EXTERN.h" #define PERL_IN_XSUTILS_C #include "perl.h" |