summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2017-02-23 09:51:42 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2017-02-24 08:13:13 -0500
commita5d565cd966ec58e5f3ca05b219fe919086f43b1 (patch)
tree7a6db157c59ec84e088daeb8a91d3aae603834f4 /embed.fnc
parent95e62f9f8dd60dc0c6b50e144c90d1640f899cd9 (diff)
downloadperl-a5d565cd966ec58e5f3ca05b219fe919086f43b1.tar.gz
Followup on a4570f51 for t/porting/extrefs.t
More functions have appeared that are PERL_STATIC_INLINE, but the porting/extrefs.t compiles with -DPERL_NO_INLINE_FUNCTIONS, which means no bodies are visible, but the Tru64 cc takes static inline seriously, requiring the bodies. Instead of the manual tweak of adding #ifndef PERL_NO_INLINE_FUNCTIONS to embed.fnc, fix the problem in embed.pl so that 'i' type inserts the required ifndef. Remove the manual PERL_NO_INLINE_FUNCTIONS insertions made in a4570f51 (note that the types of some have diverged). Now the extrefs.t again works in Tru64 (and no other compiler has ever tripped on this).
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc10
1 files changed, 0 insertions, 10 deletions
diff --git a/embed.fnc b/embed.fnc
index 25bf824f26..0a63f4756f 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -283,9 +283,7 @@ Apd |void |av_push |NN AV *av|NN SV *val
EXp |void |av_reify |NN AV *av
ApdR |SV* |av_shift |NN AV *av
Apd |SV** |av_store |NN AV *av|SSize_t key|NULLOK SV *val
-#ifndef PERL_NO_INLINE_FUNCTIONS
AidR |SSize_t|av_top_index |NN AV *av
-#endif
AmpdR |SSize_t|av_tindex |NN AV *av
Apd |void |av_undef |NN AV *av
ApdoxM |SV** |av_create_and_unshift_one|NN AV **const avp|NN SV *const val
@@ -713,9 +711,7 @@ pR |OP* |invert |NULLOK OP* cmd
ApR |I32 |is_lvalue_sub
: Used in cop.h
XopR |I32 |was_lvalue_sub
-#ifndef PERL_NO_INLINE_FUNCTIONS
ApMRnP |STRLEN |_is_utf8_char_helper|NN const U8 * const s|NN const U8 * e|const U32 flags
-#endif
ADMpR |U32 |to_uni_upper_lc|U32 c
ADMpR |U32 |to_uni_title_lc|U32 c
ADMpR |U32 |to_uni_lower_lc|U32 c
@@ -1564,9 +1560,7 @@ Apd |void |sv_magic |NN SV *const sv|NULLOK SV *const obj|const int how \
Apd |MAGIC *|sv_magicext |NN SV *const sv|NULLOK SV *const obj|const int how \
|NULLOK const MGVTBL *const vtbl|NULLOK const char *const name \
|const I32 namlen
-#ifndef PERL_NO_INLINE_FUNCTIONS
Ein |bool |sv_only_taint_gmagic|NN SV *sv
-#endif
: exported for re.pm
EXp |MAGIC *|sv_magicext_mglob|NN SV *sv
ApdbmR |SV* |sv_mortalcopy |NULLOK SV *const oldsv
@@ -1869,10 +1863,8 @@ Am |I32 |whichsig |NN const char* sig
Ap |I32 |whichsig_sv |NN SV* sigsv
Ap |I32 |whichsig_pv |NN const char* sig
Ap |I32 |whichsig_pvn |NN const char* sig|STRLEN len
-#ifndef PERL_NO_INLINE_FUNCTIONS
: used to check for NULs in pathnames and other names
AiR |bool |is_safe_syscall|NN const char *pv|STRLEN len|NN const char *what|NN const char *op_name
-#endif
#ifdef PERL_CORE
inR |bool |should_warn_nl|NN const char *pv
#endif
@@ -2780,9 +2772,7 @@ sRM |U8* |swash_scan_list_line|NN U8* l|NN U8* const lend|NN UV* min \
|NN const U8* const typestr
#endif
-#ifndef PERL_NO_INLINE_FUNCTIONS
EXiMn |void |append_utf8_from_native_byte|const U8 byte|NN U8** dest
-#endif
Apd |void |sv_set_undef |NN SV *sv
Apd |void |sv_setsv_flags |NN SV *dstr|NULLOK SV *sstr|const I32 flags