blob: 1a2226b91d789db16228a3f1524243a65b567c96 (
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
|
case foo {
f(?=o)oo {}
.* { echo fail 1 }
}
case foo {
fo(?=x)o { echo fail 2 }
.* { }
}
fun match {
set res = $($1 $2)
if [ $res != $3 ] {
echo "match $1 $2: expected $3, got $res"
}
}
fun x0 {
case $1 {
a(?=b). { echo yes }
.* { echo no }
}
}
match x0 aa no
match x0 aaa no
match x0 ab yes
fun x1 {
case $1 {
a(?!x)x { echo yes }
.* { echo no }
}
}
match x1 a no
match x1 aa no
match x1 ax no
match x1 axx no
match x1 aax no
|
