Return to m4.h CVS log

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

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

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.