1275 |
`-------------------------------------------------*/ |
`-------------------------------------------------*/ |
1276 |
|
|
1277 |
m4_divert_push([KILL])# M4 code. |
m4_divert_push([KILL])# M4 code. |
|
# b4_eval |
|
|
# ------- |
|
|
# FIXME: This is really wrong, we no longer guarantee we don't evaluate |
|
|
# the user's input. This demonstrates that decoding actions (BRACED_CODE) |
|
|
# ought to be done when output, not when read. |
|
|
m4_define([b4_eval], |
|
|
[$*]) |
|
|
|
|
1278 |
# b4_symbol_destructor(SYMBOL-NUMBER, DESTRUCTOR, TYPE-NAME) |
# b4_symbol_destructor(SYMBOL-NUMBER, DESTRUCTOR, TYPE-NAME) |
1279 |
# ---------------------------------------------------------- |
# ---------------------------------------------------------- |
1280 |
m4_define([b4_symbol_destructor], |
m4_define([b4_symbol_destructor], |
1281 |
[m4_pushdef([b4_dollar_dollar], [symbol_value.$6])dnl |
[m4_pushdef([b4_dollar_dollar], [symbol_value.$6])dnl |
1282 |
case $4: /* $3 */ |
case $4: /* $3 */ |
1283 |
#line $2 "$1" |
#line $2 "$1" |
1284 |
b4_eval($5); |
$5; |
1285 |
#line __oline__ "__ofile__" |
#line __oline__ "__ofile__" |
1286 |
break; |
break; |
1287 |
m4_popdef([b4_dollar_dollar])]) |
m4_popdef([b4_dollar_dollar])]) |