Return to m4.h CVS log

Up to [Research Unix] / researchv10no / cmd / monk / o.db

Annotation of researchv10no/cmd/monk/o.db/m4.h, revision 1.1.1.1

1.1       root        1: define(`DEFINE_NUMBER', `define($1,$2)')
                      2: define(`DEFINE_STRING_ARRAY', `changequote`'define($1,$2\n$`'1)`'changequote(+Q+,-Q-)')
                      3: define(`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.