m4.jsf.in (1823B)
1 # m4 2 3 =Idle 4 =Comment green 5 =Constant cyan 6 =Var magenta 7 =Brace bold magenta 8 =Kw bold 9 10 :start Idle 11 * start noeat call=.m4() 12 13 .subr m4 14 15 .ifdef quote 16 :idle Constant 17 .else 18 :idle Idle 19 .endif 20 * idle 21 "[" idle recolor=-1 call=.m4(quote -brace) 22 # "[" idle recolor=-1 call=.quote() 23 "a-zA-Z_" ident buffer mark 24 .ifdef quote 25 "]" idle return 26 .endif 27 .ifdef brace 28 ")" endbrace recolor=-1 29 .endif 30 31 :quote Constant 32 * quote 33 "]" idle 34 35 :endbrace Brace 36 * idle noeat return 37 38 .ifdef quote 39 :ident Constant 40 .else 41 :ident Idle 42 .endif 43 * maybe_macro noeat strings 44 "builtin" maybe_kw 45 "changecom" maybe_kw 46 "changequote" maybe_kw 47 "changeword" maybe_kw 48 "debugfile" maybe_kw 49 "debugmode" maybe_kw 50 "decr" maybe_kw 51 "define" maybe_kw 52 "defn" maybe_kw 53 "divert" maybe_kw 54 "divnum" maybe_kw 55 "dnl" comment 56 "dumpdef" maybe_kw 57 "errprint" maybe_kw 58 "esyscmd" maybe_kw 59 "eval" maybe_kw 60 "file" maybe_kw 61 "format" maybe_kw 62 "ifdef" maybe_kw 63 "ifelse" maybe_kw 64 "include" maybe_kw 65 "incr" maybe_kw 66 "index" maybe_kw 67 "indir" maybe_kw 68 "len" maybe_kw 69 "line" maybe_kw 70 "m4exit" maybe_kw 71 "m4wrap" maybe_kw 72 "maketemp" maybe_kw 73 "patsubst" maybe_kw 74 "popdef" maybe_kw 75 "pushdef" maybe_kw 76 "regexp" maybe_kw 77 "shift" maybe_kw 78 "sinclude" maybe_kw 79 "substr" maybe_kw 80 "syscmd" maybe_kw 81 "sysval" maybe_kw 82 "traceoff" maybe_kw 83 "traceon" maybe_kw 84 "translit" maybe_kw 85 "undefine" maybe_kw 86 "undivert" maybe_kw 87 done 88 "a-zA-Z0-9_" ident 89 90 :maybe_macro Idle 91 * idle noeat 92 "(" macro recolormark noeat 93 94 :maybe_kw Idle 95 * idle noeat 96 "(" kw recolormark noeat 97 98 :kw Kw 99 * idle noeat 100 "(" macro noeat 101 102 :comment Comment 103 * comment 104 "\n" idle 105 106 :macro Var 107 * idle noeat 108 "(" brace recolor=-1 109 110 :brace Brace 111 * idle noeat call=.m4(brace -quote) 112 113 .end 114 115 .subr quote 116 :idle Constant 117 * idle 118 "]" idle return 119 "[" idle call=.quote() 120 121 .end