我写了一个小的 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(`')))
.
.
.
直到由于超出递归限制而中止执行。我想知道为什么会这样,因为实际上
1
和 1
应该比较相等,而 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/