Skip to content

Commit 2642bf6

Browse files
BlueDrink9BlueDrink9
committed
add initial bunch of r scopes
1 parent 35f3646 commit 2642bf6

15 files changed

+646
-5
lines changed

‎data/fixtures/scopes/r/anonymousFunction.scope

+17
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,17 @@
1+
lapply(1:10, function(x) x^2)
2+
---
3+
4+
[Content] =
5+
[Domain] = 0:13-0:28
6+
>---------------<
7+
0| lapply(1:10, function(x) x^2)
8+
9+
[Removal] = 0:12-0:28
10+
>----------------<
11+
0| lapply(1:10, function(x) x^2)
12+
13+
[Leading delimiter] = 0:12-0:13
14+
>-<
15+
0| lapply(1:10, function(x) x^2)
16+
17+
[Insertion delimiter] = "\n"

‎data/fixtures/scopes/r/argument.actual.scope

+30
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,30 @@
1+
func(1)
2+
func(...)
3+
func(x=1)
4+
---
5+
6+
[#1 Content] =
7+
[#1 Removal] =
8+
[#1 Domain] = 0:5-0:6
9+
>-<
10+
0| func(1)
11+
12+
[#1 Insertion delimiter] = " "
13+
14+
15+
[#2 Content] =
16+
[#2 Removal] =
17+
[#2 Domain] = 1:5-1:8
18+
>---<
19+
1| func(...)
20+
21+
[#2 Insertion delimiter] = " "
22+
23+
24+
[#3 Content] =
25+
[#3 Removal] =
26+
[#3 Domain] = 2:5-2:8
27+
>---<
28+
2| func(x=1)
29+
30+
[#3 Insertion delimiter] = " "

‎data/fixtures/scopes/r/argumentList.formal.scope

+13
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,13 @@
1+
abc <- function(x, y){ }
2+
---
3+
4+
[Content] =
5+
[Removal] = 0:16-0:20
6+
>----<
7+
0| abc <- function(x, y){ }
8+
9+
[Domain] = 0:7-0:24
10+
>-----------------<
11+
0| abc <- function(x, y){ }
12+
13+
[Insertion delimiter] = ", "

‎data/fixtures/scopes/r/comment.line.scope

+10
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
# Hello world
2+
---
3+
4+
[Content] =
5+
[Removal] =
6+
[Domain] = 0:0-0:13
7+
>-------------<
8+
0| # Hello world
9+
10+
[Insertion delimiter] = "\n"

‎data/fixtures/scopes/r/functionCall.scope

+10
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
lapply(1:10, function(x) x^2)
2+
---
3+
4+
[Content] =
5+
[Removal] =
6+
[Domain] = 0:0-0:29
7+
>-----------------------------<
8+
0| lapply(1:10, function(x) x^2)
9+
10+
[Insertion delimiter] = " "

‎data/fixtures/scopes/r/functionCallee.scope

+10
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
lapply(1:10, function(x) x^2)
2+
---
3+
4+
[Content] =
5+
[Removal] =
6+
[Domain] = 0:0-0:6
7+
>------<
8+
0| lapply(1:10, function(x) x^2)
9+
10+
[Insertion delimiter] = " "

‎data/fixtures/scopes/r/functionName.scope

+19
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,19 @@
1+
abc <- function(arg){
2+
TRUE
3+
}
4+
---
5+
6+
[Content] =
7+
[Domain] = 0:0-0:3
8+
>---<
9+
0| abc <- function(arg){
10+
11+
[Removal] = 0:0-0:4
12+
>----<
13+
0| abc <- function(arg){
14+
15+
[Trailing delimiter] = 0:3-0:4
16+
>-<
17+
0| abc <- function(arg){
18+
19+
[Insertion delimiter] = " "

‎data/fixtures/scopes/r/ifStatement.scope

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

‎data/fixtures/scopes/r/name.assignment.scope

+34
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,34 @@
1+
hello <- "world"
2+
hello = "world"
3+
---
4+
5+
[#1 Content] =
6+
[#1 Domain] = 0:0-0:5
7+
>-----<
8+
0| hello <- "world"
9+
10+
[#1 Removal] = 0:0-0:6
11+
>------<
12+
0| hello <- "world"
13+
14+
[#1 Trailing delimiter] = 0:5-0:6
15+
>-<
16+
0| hello <- "world"
17+
18+
[#1 Insertion delimiter] = " "
19+
20+
21+
[#2 Content] =
22+
[#2 Domain] = 1:0-1:5
23+
>-----<
24+
1| hello = "world"
25+
26+
[#2 Removal] = 1:0-1:6
27+
>------<
28+
1| hello = "world"
29+
30+
[#2 Trailing delimiter] = 1:5-1:6
31+
>-<
32+
1| hello = "world"
33+
34+
[#2 Insertion delimiter] = " "

‎data/fixtures/scopes/r/name.variable.scope

+34
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,34 @@
1+
hello <- "world"
2+
hello = "world"
3+
---
4+
5+
[#1 Content] =
6+
[#1 Domain] = 0:0-0:5
7+
>-----<
8+
0| hello <- "world"
9+
10+
[#1 Removal] = 0:0-0:6
11+
>------<
12+
0| hello <- "world"
13+
14+
[#1 Trailing delimiter] = 0:5-0:6
15+
>-<
16+
0| hello <- "world"
17+
18+
[#1 Insertion delimiter] = " "
19+
20+
21+
[#2 Content] =
22+
[#2 Domain] = 1:0-1:5
23+
>-----<
24+
1| hello = "world"
25+
26+
[#2 Removal] = 1:0-1:6
27+
>------<
28+
1| hello = "world"
29+
30+
[#2 Trailing delimiter] = 1:5-1:6
31+
>-<
32+
1| hello = "world"
33+
34+
[#2 Insertion delimiter] = " "

‎data/fixtures/scopes/r/namedFunction.scope

+44
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,44 @@
1+
abc <- function(arg){
2+
TRUE
3+
}
4+
abc = function(arg){
5+
TRUE
6+
}
7+
---
8+
9+
[#1 Content] =
10+
[#1 Domain] = 0:0-2:1
11+
>---------------------
12+
0| abc <- function(arg){
13+
1| TRUE
14+
2| }
15+
-<
16+
17+
[#1 Removal] = 0:0-3:0
18+
>---------------------
19+
0| abc <- function(arg){
20+
1| TRUE
21+
2| }
22+
3| abc = function(arg){
23+
<
24+
25+
[#1 Insertion delimiter] = "\n\n"
26+
27+
28+
[#2 Content] =
29+
[#2 Domain] = 3:0-5:1
30+
>--------------------
31+
3| abc = function(arg){
32+
4| TRUE
33+
5| }
34+
-<
35+
36+
[#2 Removal] = 2:1-5:1
37+
>
38+
2| }
39+
3| abc = function(arg){
40+
4| TRUE
41+
5| }
42+
-<
43+
44+
[#2 Insertion delimiter] = "\n\n"

‎data/fixtures/scopes/r/value.assignment.scope

+34
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,34 @@
1+
hello <- "world"
2+
hello = "world"
3+
---
4+
5+
[#1 Content] =
6+
[#1 Domain] = 0:9-0:16
7+
>-------<
8+
0| hello <- "world"
9+
10+
[#1 Removal] = 0:8-0:16
11+
>--------<
12+
0| hello <- "world"
13+
14+
[#1 Leading delimiter] = 0:8-0:9
15+
>-<
16+
0| hello <- "world"
17+
18+
[#1 Insertion delimiter] = " "
19+
20+
21+
[#2 Content] =
22+
[#2 Domain] = 1:8-1:15
23+
>-------<
24+
1| hello = "world"
25+
26+
[#2 Removal] = 1:7-1:15
27+
>--------<
28+
1| hello = "world"
29+
30+
[#2 Leading delimiter] = 1:7-1:8
31+
>-<
32+
1| hello = "world"
33+
34+
[#2 Insertion delimiter] = " "

‎data/fixtures/scopes/r/value.variable.scope

+34
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,34 @@
1+
hello <- "world"
2+
hello = "world"
3+
---
4+
5+
[#1 Content] =
6+
[#1 Domain] = 0:9-0:16
7+
>-------<
8+
0| hello <- "world"
9+
10+
[#1 Removal] = 0:8-0:16
11+
>--------<
12+
0| hello <- "world"
13+
14+
[#1 Leading delimiter] = 0:8-0:9
15+
>-<
16+
0| hello <- "world"
17+
18+
[#1 Insertion delimiter] = " "
19+
20+
21+
[#2 Content] =
22+
[#2 Domain] = 1:8-1:15
23+
>-------<
24+
1| hello = "world"
25+
26+
[#2 Removal] = 1:7-1:15
27+
>--------<
28+
1| hello = "world"
29+
30+
[#2 Leading delimiter] = 1:7-1:8
31+
>-<
32+
1| hello = "world"
33+
34+
[#2 Insertion delimiter] = " "

0 commit comments

Comments
 (0)