我写了一个小的 m4 脚本( test.m4 )用于测试目的:

define(`test', `ifelse(`$#', `1', `$1', test(shift($@)))')
test(`arg1', `arg2')

并用 m4 test.m4 -t test -de 1 运行它。输出是
m4trace: -1- test -> ifelse(`2', `1', `arg1', test(shift(`arg1',`arg2')))
m4trace: -2- test -> ifelse(`1', `1', `arg2', test(shift(`arg2')))
m4trace: -3- test -> ifelse(`1', `1', `', test(shift(`')))
m4trace: -4- test -> ifelse(`1', `1', `', test(shift(`')))
.
.
.

直到由于超出递归限制而中止执行。我想知道为什么会这样,因为实际上 11 应该比较相等,而 if else 宏应该评估为 `'

但是,我有一个创新的想法,将 [not-equal] 放在引号中,所以宏看起来像这样:
define(`test', `ifelse(`$#', `1', `$1', `test(shift($@))')')
test(`arg1', `arg2')

瞧,它就像一个魅力(即 arg2 与领先的换行符一起打印出来)。
输出(具有相同的调用参数):
NL
m4trace: -1- test -> ifelse(`2', `1', `arg1', `test(shift(`arg1',`arg2'))')
m4trace: -1- test -> ifelse(`1', `1', `arg2', `test(shift(`arg2'))')
arg2

( NL 代表“换行符”)。

我的结论:即使要比较的两个字符串实际上相等,预处理器仍然会评估 [not-equal] 分支。

这有什么特定目的吗? IMO,这只是不直观。或者我错过了什么?

1 -t test 打开宏 test 的调试跟踪。 -de 将调用的宏的定义添加到调试输出中。

最佳答案

虽然表达式是相等的(除了引号),但它们的执行时间不同(由于引号)。

在第一种情况下 test 宏在父 test 的宏替换期间被执行。所以你会经历一个递归:测试内部测试内部测试等等。

第二种情况使表达式在 AFTERWARDS 之后执行。所以你没有递归。测试后测试。

This behaviour is very well described in the manual.

“16.3 其他不兼容性”部分:

关于if-statement - 为什么无论如何都要评估 ifelse 宏的 "wrong"表达式?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/36815971/

10-12 00:36
查看更多