|
|
1.1 root 1: define(`LITERAL', `define($1,$2)')
2: define(`STRING_ARRAY', `changequote`'define($1,$2\n$`'1)`'changequote(+Q+,-Q-)')
3: define(`STRING', `define($1,$2)')
4: define(`UNEQUAL_STRING_REGISTERS',`changequote`'ifelse(eval(len($1)==1&&len($2)==1),1,"!@\*$1@\*$2@",eval(len($1)==1&&len($2)==2),1,"!@\*$1@\*`('$2@",eval(len($1)==2&&len($2)==1),1,"!@\*`('$1@\*$2@","!@\*`('$1@\*`('$2@")`'changequote(+Q+,-Q-)')
5: define(`EQUAL_STRING',`changequote`'ifelse(len($1),1,"@\*$1@$2@","@\*`('$1@$2@")`'changequote(+Q+,-Q-)')
6: define(`UNEQUAL_STRING',`changequote`'ifelse(len($1),1,"!@\*$1@$2@","!@\*`('$1@$2@")`'changequote(+Q+,-Q-)')
7: define(`NULL_STRING', `changequote`'ifelse($#,1,"@\*`('$1@@",$#,2,"@\*`('$1\*`('$2@@",$#,3,"@\*`('$1\*`('$2\*`('$3@@",$#,4,"@\*`('$1\*`('$2\*`('$3\*`('$4@@","$#")`'changequote(+Q+,-Q-)')
8: define(`NOT_NULL_STRING', `changequote`'ifelse($#,1,"!@\*`('$1@@",$#,2,"!@\*`('$1\*`('$2@@",$#,3,"!@\*`('$1\*`('$2\*`('$3@@",$#,4,"!@\*`('$1\*`('$2\*`('$3\*`('$4@@")`'changequote(+Q+,-Q-)')
9: define(`GT_NUMBER',`changequote`'ifelse(len($1),1,"\n$1>$2","\n`('$1>$2")`'changequote(+Q+,-Q-)')
10: define(`GE_NUMBER',`changequote`'ifelse(len($1),1,"\n$1>=$2","\n`('$1>=$2")`'changequote(+Q+,-Q-)')
11: define(`EQ_NUMBER',`changequote`'ifelse(len($1),1,"\n$1=$2","\n`('$1=$2")`'changequote(+Q+,-Q-)')
12: define(`LE_NUMBER',`changequote`'ifelse(len($1),1,"\n$1<=$2","\n`('$1<=$2")`'changequote(+Q+,-Q-)')
13: define(`GT_NUMBER_REGISTER',`changequote`'ifelse(eval(len($1)==1&&len($2)==1),1,"\n$1>\n$2",eval(len($1)==1&&len($2)==2),1,"\n$1>\n`('$2",eval(len($1)==2&&len($2)==1),1,"\n`('$1>\n$2","\n`('$1>\n`('$2")`'changequote(+Q+,-Q-)')
14: define(`GE_NUMBER_REGISTER',`changequote`'ifelse(eval(len($1)==1&&len($2)==1),1,"\n$1>=\n$2",eval(len($1)==1&&len($2)==2),1,"\n$1>=\n`('$2",eval(len($1)==2&&len($2)==1),1,"\n`('$1>=\n$2","\n`('$1>=\n`('$2")`'changequote(+Q+,-Q-)')
15: define(`LE_CONSTANT',`"$1<=$2"')
16: define(`EQUAL_MACRO_ARGUMENT', `"\$$1=$2"')
17: define(`EQUAL_DIVERSION', `"@\n(.z@$1@"')
18: changecom
19: undefine(`undefine', `defn', `pushdef', `popdef', `ifdef', `shift',
20: `changecom', `divert', `undivert', `divnum', `dnl', `incr',
21: `decr', `index', `substr', `translit', `sinclude',
22: `syscmd', `sysval', `maketemp', `m4exit', `m4wrap', `errprint', `dumpdef',
23: `traceon', `traceoff')
24: changequote(`+Q+',`-Q-')
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.