Skip to content

Commit 858e285

Browse files
wenkokkewenkokke
committed
Add @Branch and @branch.iteration
1 parent 721132e commit 858e285

File tree

6 files changed

+531
-16
lines changed

6 files changed

+531
-16
lines changed

‎packages/cursorless-vscode-e2e/src/suite/fixtures/scopes/haskell/branch.match1.scope

Lines changed: 56 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,56 @@
1+
fib :: Integer -> Integer
2+
fib 0 = 0
3+
fib 1 = 1
4+
fib n = fib (n-1) + fib (n-2)
5+
6+
---
7+
8+
[#1 Content] =
9+
[#1 Removal] =
10+
[#1 Domain] = 1:0-1:9
11+
0| fib :: Integer -> Integer
12+
13+
1| fib 0 = 0
14+
>---------<
15+
2| fib 1 = 1
16+
17+
3| fib n = fib (n-1) + fib (n-2)
18+
19+
4|
20+
21+
22+
[#1 Insertion delimiter] = "\n"
23+
24+
25+
[#2 Content] =
26+
[#2 Removal] =
27+
[#2 Domain] = 2:0-2:9
28+
0| fib :: Integer -> Integer
29+
30+
1| fib 0 = 0
31+
32+
2| fib 1 = 1
33+
>---------<
34+
3| fib n = fib (n-1) + fib (n-2)
35+
36+
4|
37+
38+
39+
[#2 Insertion delimiter] = "\n"
40+
41+
42+
[#3 Content] =
43+
[#3 Removal] =
44+
[#3 Domain] = 3:0-3:29
45+
0| fib :: Integer -> Integer
46+
47+
1| fib 0 = 0
48+
49+
2| fib 1 = 1
50+
51+
3| fib n = fib (n-1) + fib (n-2)
52+
>-----------------------------<
53+
4|
54+
55+
56+
[#3 Insertion delimiter] = "\n"

‎packages/cursorless-vscode-e2e/src/suite/fixtures/scopes/haskell/branch.match2.scope

Lines changed: 102 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,102 @@
1+
abs :: Int -> Int
2+
abs x
3+
| x >= 0 = x
4+
| otherwise = -x
5+
6+
---
7+
8+
[#1 Content] =
9+
[#1 Removal] =
10+
[#1 Domain] = 1:0-3:20
11+
0| abs :: Int -> Int
12+
13+
1| abs x
14+
>-----
15+
2| | x >= 0 = x
16+
--------------------
17+
3| | otherwise = -x
18+
--------------------<
19+
4|
20+
21+
22+
[#1 Insertion delimiter] = "\n"
23+
24+
25+
[#2 Content] =
26+
[#2 Domain] = 2:6-2:20
27+
0| abs :: Int -> Int
28+
29+
1| abs x
30+
31+
2| | x >= 0 = x
32+
>--------------<
33+
3| | otherwise = -x
34+
35+
4|
36+
37+
38+
[#2 Removal] = 2:4-2:20
39+
0| abs :: Int -> Int
40+
41+
1| abs x
42+
43+
2| | x >= 0 = x
44+
>----------------<
45+
3| | otherwise = -x
46+
47+
4|
48+
49+
50+
[#2 Leading delimiter] = 2:5-2:6
51+
0| abs :: Int -> Int
52+
53+
1| abs x
54+
55+
2| | x >= 0 = x
56+
>-<
57+
3| | otherwise = -x
58+
59+
4|
60+
61+
62+
[#2 Insertion delimiter] = "\n"
63+
64+
65+
[#3 Content] =
66+
[#3 Domain] = 3:6-3:20
67+
0| abs :: Int -> Int
68+
69+
1| abs x
70+
71+
2| | x >= 0 = x
72+
73+
3| | otherwise = -x
74+
>--------------<
75+
4|
76+
77+
78+
[#3 Removal] = 3:4-3:20
79+
0| abs :: Int -> Int
80+
81+
1| abs x
82+
83+
2| | x >= 0 = x
84+
85+
3| | otherwise = -x
86+
>----------------<
87+
4|
88+
89+
90+
[#3 Leading delimiter] = 3:5-3:6
91+
0| abs :: Int -> Int
92+
93+
1| abs x
94+
95+
2| | x >= 0 = x
96+
97+
3| | otherwise = -x
98+
>-<
99+
4|
100+
101+
102+
[#3 Insertion delimiter] = "\n"

‎packages/cursorless-vscode-e2e/src/suite/fixtures/scopes/haskell/branch.match3.scope

Lines changed: 102 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,102 @@
1+
bap :: Int -> Int
2+
bap x
3+
| x > 0, x == 0 = x
4+
| otherwise = -x
5+
6+
---
7+
8+
[#1 Content] =
9+
[#1 Removal] =
10+
[#1 Domain] = 1:0-3:20
11+
0| bap :: Int -> Int
12+
13+
1| bap x
14+
>-----
15+
2| | x > 0, x == 0 = x
16+
------------------------
17+
3| | otherwise = -x
18+
--------------------<
19+
4|
20+
21+
22+
[#1 Insertion delimiter] = "\n"
23+
24+
25+
[#2 Content] =
26+
[#2 Domain] = 2:6-2:24
27+
0| bap :: Int -> Int
28+
29+
1| bap x
30+
31+
2| | x > 0, x == 0 = x
32+
>------------------<
33+
3| | otherwise = -x
34+
35+
4|
36+
37+
38+
[#2 Removal] = 2:4-2:24
39+
0| bap :: Int -> Int
40+
41+
1| bap x
42+
43+
2| | x > 0, x == 0 = x
44+
>--------------------<
45+
3| | otherwise = -x
46+
47+
4|
48+
49+
50+
[#2 Leading delimiter] = 2:5-2:6
51+
0| bap :: Int -> Int
52+
53+
1| bap x
54+
55+
2| | x > 0, x == 0 = x
56+
>-<
57+
3| | otherwise = -x
58+
59+
4|
60+
61+
62+
[#2 Insertion delimiter] = "\n"
63+
64+
65+
[#3 Content] =
66+
[#3 Domain] = 3:6-3:20
67+
0| bap :: Int -> Int
68+
69+
1| bap x
70+
71+
2| | x > 0, x == 0 = x
72+
73+
3| | otherwise = -x
74+
>--------------<
75+
4|
76+
77+
78+
[#3 Removal] = 3:4-3:20
79+
0| bap :: Int -> Int
80+
81+
1| bap x
82+
83+
2| | x > 0, x == 0 = x
84+
85+
3| | otherwise = -x
86+
>----------------<
87+
4|
88+
89+
90+
[#3 Leading delimiter] = 3:5-3:6
91+
0| bap :: Int -> Int
92+
93+
1| bap x
94+
95+
2| | x > 0, x == 0 = x
96+
97+
3| | otherwise = -x
98+
>-<
99+
4|
100+
101+
102+
[#3 Insertion delimiter] = "\n"

0 commit comments

Comments
 (0)