blob: ca44109bd785dc119ab6790f2d21a569a5e4ed84 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
auto-auto-complete ::= _ program _
program ::= '(' _ value _ body ')'
body ::= [{(multiple | default | unargumented | argumented | variadic | suggestion) _}]
_value ::= __ name | _ value | _ case
value ::= name | variable | case
variable ::= '(' _ "value" __ name _ [{value _}] ')'
case ::= '(' _ "case" {_ a_case} _ ')'
a_case ::= '(' {_ value} _ ')'
multiple ::= '(' _ "multiple" <keyword=_value> [{_ '(' _ <item=anything> _ ')'}] _ ')'
==> [{'(' <keyword> ' ' <item> ')'}]
anything ::= [{_ value | _ '(' anything _ ')'}]
default ::= '(' _ "default" (4-:_ ) _ ')'
unargumented ::= '(' _ "unargumented" (3-:_ (options | complete | desc)) _ ')'
argumented ::= '(' _ "argumented" (6-:_ (options | complete | arg | suggest | files | bind | desc)) _ ')'
variadic ::= '(' _ "variadic" (6-:_ (options | complete | arg | suggest | files | bind | desc)) _ ')'
options ::= '(' _ "options" _value [{_ value}] ')'
complete ::= '(' _ "complete" _value [{_ value}] ')'
arg ::= '(' _ "arg" _value ')'
suggest ::= '(' _ "suggest" _value ')'
files ::= '(' _ "files" _value [{_ value}] ')'
::= {"-0" | "-a" | "-d" | "-D" | "-f" | "-l" | "-r"} [{value}]
bind ::= '(' _ "bind" _value ')'
desc ::= '(' _ "desc" _value ')'
suggestion ::= '(' _ "suggestion" _ value {_ a_suggestion} _ ')'
a_suggestion ::= '(' _ (exec | noexec | ls | verbatim | calc) _ ')'
exec ::= 'exec' (__ value | _ any_exec) [{_ value | _ any_exec}]
noexec ::= ls | verbatim
ls ::= 'ls' _value [_ value]
verbatim ::= 'verbatim' _value [{_ value}]
calc ::= 'calc' (__ value | _ any_exec) [{_ value | _ any_exec}]
any_exec ::= '(' _ exec_type (__ value | _ any_exec) [{_ value | _ any_exec}] _ ')'
exec_type ::= "exec" | "calc" | "pipe" | "fullpipe" | "cat" | "and" | "or"
name ::= {letter | escape | squote | dquote}
letter :: $any ^ ' ' ^ \t ^ \n ^ \r ^ \t ^ '\' ^ \' ^ \"
escape ::= '\' $any
squote ::= \' [{$any ^ '\' ^ \' | escape}] \'
dquote ::= \" [{$any ^ '\' ^ \" | escape}] \"
comment ::= ('#' | ';') [{$any}] \z
__ ::= {' ' | \t | \n | \r | \f | comment}
_ ::= [__]
|
