xref: /Universal-ctags/Units/parser-r.r/r-scope.d/input.r (revision 25ec6aefd5083ccfcf92f272f2914cfb85028613) 
1c00 = 1
2c01 <- 2
3c02 <<- 3
4
5f0 <- function() {
6   r0 <- c00 + c01 + c02
7}
8
9f1 <- function(a1) {
10   r1 = c00 + c01 + c02 + a1
11}
12
13f2 <- function(a20, a21) {
14   r2 <<- c00 + c01 + c02 + a20 + a21
15}
16
17f4 <- function() c02 +
18   c01 +
19   c02
20
21f5 <- function(a5) c(1,
221,
23r5 <- 3,
24a5)
25
26f5(a5 = 4)
27f5((c50 = 4))
28f5(c51 <- 4)
29f5(c52 <<- 4)
30