This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Refactor S_incpush() to take 1 flags parameter, instead of 5 positional booleans
[perl5.git] / proto.h
diff --git a/proto.h b/proto.h
index 9b587d9..a4fc664 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -4759,7 +4759,7 @@ STATIC void       S_find_beginning(pTHX_ SV* linestr_sv, PerlIO *rsfp)
        assert(linestr_sv); assert(rsfp)
 
 STATIC void    S_forbid_setid(pTHX_ const char flag, const bool suidscript);
-STATIC void    S_incpush(pTHX_ const char *dir, bool addsubdirs, bool addoldvers, bool usesep, bool canrelocate, bool unshift);
+STATIC void    S_incpush(pTHX_ const char *dir, U32 flags);
 STATIC void    S_init_interp(pTHX);
 STATIC void    S_init_ids(pTHX);
 STATIC void    S_init_main_stash(pTHX);