diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-27 07:44:55 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-07-27 07:44:55 +0000 |
commit | 2cc242586845107754f99fa3e09637c9a344d545 (patch) | |
tree | 476ba85bdc88a58ae163c5a071b668771b1f645d /ext | |
parent | 90c52cc6f6105aad11dc794b44b867d807c2a36e (diff) | |
parent | 6055f9d42166344699550b8045e96c47c97d767c (diff) | |
download | perl-2cc242586845107754f99fa3e09637c9a344d545.tar.gz |
Integrate with Sarathy.
p4raw-id: //depot/cfgperl@3789
Diffstat (limited to 'ext')
-rw-r--r-- | ext/B/B/CC.pm | 2 | ||||
-rw-r--r-- | ext/SDBM_File/sdbm/sdbm.h | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/ext/B/B/CC.pm b/ext/B/B/CC.pm index 30882dd48f..4affda0014 100644 --- a/ext/B/B/CC.pm +++ b/ext/B/B/CC.pm @@ -54,7 +54,7 @@ my %ignore_op; # Hash of ops which do nothing except returning op_next my %need_curcop; # Hash of ops which need PL_curcop BEGIN { - foreach (qw(pp_setstate pp_scalar pp_regcmaybe pp_lineseq pp_scope pp_null)) { + foreach (qw(pp_scalar pp_regcmaybe pp_lineseq pp_scope pp_null)) { $ignore_op{$_} = 1; } } diff --git a/ext/SDBM_File/sdbm/sdbm.h b/ext/SDBM_File/sdbm/sdbm.h index c3c2a6d59b..86ba82d82f 100644 --- a/ext/SDBM_File/sdbm/sdbm.h +++ b/ext/SDBM_File/sdbm/sdbm.h @@ -99,8 +99,12 @@ extern long sdbm_hash proto((char *, int)); #define dbm_clearerr sdbm_clearerr #endif -/* Most of the following is stolen from perl.h. */ +/* Most of the following is stolen from perl.h. We don't include + perl.h here because we just want the portability parts of perl.h, + not everything else. +*/ #ifndef H_PERL /* Include guard */ +#include "embed.h" /* Follow all the global renamings. */ /* * The following contortions are brought to you on behalf of all the |