W | |
with_spaces, Test_FAI_DiskConfig | |
word | |
word_slash, Keepalived | |
ws, cgrules | |
X | |
xchg, Build | |
xchgs, Build | |
Xinetd | |
Xorg |
let with_spaces = "disk_config disk2 raw-disk - 0 - - "
let word = Rx.word
let word = /[^|", \t\n]+/
let word = /[^#, \n\t\/]+/
let word = Rx.word
let word = /[^#, \n\t\/]+/
let word = /[^=\n\t ]+/
An alphanumeric string
let word = /[A-Za-z0-9_.-]+/
our version can’t start with [_.-] because it would mess up the grammar
let word = /[A-Za-z0-9][A-Za-z0-9_.-]*/
let word_slash = word | "/"
let ws = del /[ \t]+/ " "
Replace a pattern with a different label in the tree, thus emulating a key but allowing to replace the keyword with a different value than matched
let xchg (m:regexp) (d:string) (l:string) = del m d . label l
Same as xchg, but the pattern is the default string
let xchgs (m:string) (l:string) = xchg m m l