diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-02-15 16:18:34 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-02-15 17:40:59 +0000 |
| commit | a26c0e281cb6068a8d148933281d8186f1eb4206 (patch) | |
| tree | ffc145e69008c8dc8e4ccddfd23b0ffb72800635 /embed.h | |
| parent | 55b4bc1cac18bd560bcd9386594a419294fafc1d (diff) | |
| download | perl-a26c0e281cb6068a8d148933281d8186f1eb4206.tar.gz | |
Loop in S_init_perllib(), only calling S_incpush*() with INCPUSH_ADD_OLD_VERS
the second time (and only for those entries at had it). Implement the loop by
calling init_perllib() twice, to avoid a rats nest of re-indenting. Add a new
flag to S_incpush() INCPUSH_NOT_BASEDIR, to supress pushing the base directory
a second time on the secnod call.
With this change, re-ordering of @INC from version-orientated to prefix-
orientated is partly complete. ARCHLIB and PRIVLIB remain at their old place in
the @INC order.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3631,7 +3631,7 @@ #define init_interp() S_init_interp(aTHX) #define init_ids() S_init_ids(aTHX) #define init_main_stash() S_init_main_stash(aTHX) -#define init_perllib() S_init_perllib(aTHX) +#define init_perllib(a) S_init_perllib(aTHX_ a) #define init_postdump_symbols(a,b,c) S_init_postdump_symbols(aTHX_ a,b,c) #define init_predump_symbols() S_init_predump_symbols(aTHX) #define my_exit_jump() S_my_exit_jump(aTHX) |