32 |
|
|
33 |
/* function macros blind minargs maxargs */ |
/* function macros blind minargs maxargs */ |
34 |
#define builtin_functions \ |
#define builtin_functions \ |
35 |
BUILTIN (perleval, FALSE, FALSE, 0, -1 ) \ |
BUILTIN (perleval, false, false, 0, -1 ) \ |
36 |
|
|
37 |
|
|
38 |
#define BUILTIN(handler, macros, blind, min, max) M4BUILTIN(handler) |
#define BUILTIN(handler, macros, blind, min, max) M4BUILTIN(handler) |
47 |
builtin_functions |
builtin_functions |
48 |
#undef BUILTIN |
#undef BUILTIN |
49 |
|
|
50 |
{ 0, 0, FALSE, FALSE, 0, 0 }, |
{ 0, 0, false, false, 0, 0 }, |
51 |
}; |
}; |
52 |
|
|
53 |
/* A table for mapping m4 symbol names to simple expansion text. */ |
/* A table for mapping m4 symbol names to simple expansion text. */ |
111 |
if (i > 1) |
if (i > 1) |
112 |
obstack_1grow (obs, ','); |
obstack_1grow (obs, ','); |
113 |
|
|
114 |
val = perl_eval_pv(M4ARG(i), TRUE); |
val = perl_eval_pv(M4ARG(i), true); |
115 |
|
|
116 |
m4_shipout_string(context, obs, SvPV(val,PL_na), 0, FALSE); |
m4_shipout_string(context, obs, SvPV(val,PL_na), 0, false); |
117 |
} |
} |
118 |
} |
} |