summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-02-15 11:27:51 +0000
committerNicholas Clark <nick@ccl4.org>2009-02-15 11:27:51 +0000
commit3a9a9ba7ba00ef2d443ef225f942083a6a22e3f3 (patch)
tree8455fb31fb58a5d42dc52496c5d9d5aa40af6217 /proto.h
parentcd5cc49dbc0e5ee748252c2da8b435855908e6d2 (diff)
downloadperl-3a9a9ba7ba00ef2d443ef225f942083a6a22e3f3.tar.gz
For -I, need to also unshift version and architecture libs onto @INC (RT#6665)
(20189146be79a0596543441fa369c6bf7f85103f only added the given directory.)
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h7
1 files changed, 4 insertions, 3 deletions
diff --git a/proto.h b/proto.h
index 157038ff4b..9b587d9069 100644
--- a/proto.h
+++ b/proto.h
@@ -4798,10 +4798,11 @@ STATIC void* S_parse_body(pTHX_ char **env, XSINIT_t xsinit);
STATIC void S_run_body(pTHX_ I32 oldscope)
__attribute__noreturn__;
-STATIC SV * S_incpush_if_exists(pTHX_ SV *dir)
- __attribute__nonnull__(pTHX_1);
+STATIC SV * S_incpush_if_exists(pTHX_ AV *const av, SV *dir)
+ __attribute__nonnull__(pTHX_1)
+ __attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_INCPUSH_IF_EXISTS \
- assert(dir)
+ assert(av); assert(dir)
#endif