From 2697e9021587813fa3ae8742cc432c15bad25838 Mon Sep 17 00:00:00 2001
From: Andreas Arvidsson <andreas.arvidsson87@gmail.com>
Date: Mon, 11 Aug 2025 14:10:12 +0200
Subject: [PATCH] Added tests for r language argument scope with 3 arguments

---
 .../argument.actual.singleLine5.scope         | 53 +++++++++++++++++++
 .../argument.formal.singleLine2.scope         | 53 +++++++++++++++++++
 2 files changed, 106 insertions(+)
 create mode 100644 data/fixtures/scopes/r/argument/argument.actual.singleLine5.scope
 create mode 100644 data/fixtures/scopes/r/argument/argument.formal.singleLine2.scope

diff --git a/data/fixtures/scopes/r/argument/argument.actual.singleLine5.scope b/data/fixtures/scopes/r/argument/argument.actual.singleLine5.scope
new file mode 100644
index 0000000000..1a0999b6b5
--- /dev/null
+++ b/data/fixtures/scopes/r/argument/argument.actual.singleLine5.scope
@@ -0,0 +1,53 @@
+func(aaa, bbb, ccc)
+---
+
+[#1 Content] =
+[#1 Domain] = 0:5-0:8
+       >---<
+0| func(aaa, bbb, ccc)
+
+[#1 Removal] = 0:5-0:10
+       >-----<
+0| func(aaa, bbb, ccc)
+
+[#1 Trailing delimiter] = 0:8-0:10
+          >--<
+0| func(aaa, bbb, ccc)
+
+[#1 Insertion delimiter] = ", "
+
+
+[#2 Content] =
+[#2 Domain] = 0:10-0:13
+            >---<
+0| func(aaa, bbb, ccc)
+
+[#2 Removal] = 0:10-0:15
+            >-----<
+0| func(aaa, bbb, ccc)
+
+[#2 Leading delimiter] = 0:8-0:10
+          >--<
+0| func(aaa, bbb, ccc)
+
+[#2 Trailing delimiter] = 0:13-0:15
+               >--<
+0| func(aaa, bbb, ccc)
+
+[#2 Insertion delimiter] = ", "
+
+
+[#3 Content] =
+[#3 Domain] = 0:15-0:18
+                 >---<
+0| func(aaa, bbb, ccc)
+
+[#3 Removal] = 0:13-0:18
+               >-----<
+0| func(aaa, bbb, ccc)
+
+[#3 Leading delimiter] = 0:13-0:15
+               >--<
+0| func(aaa, bbb, ccc)
+
+[#3 Insertion delimiter] = ", "
diff --git a/data/fixtures/scopes/r/argument/argument.formal.singleLine2.scope b/data/fixtures/scopes/r/argument/argument.formal.singleLine2.scope
new file mode 100644
index 0000000000..6671acf160
--- /dev/null
+++ b/data/fixtures/scopes/r/argument/argument.formal.singleLine2.scope
@@ -0,0 +1,53 @@
+foo <- function(aaa, bbb, ccc) {}
+---
+
+[#1 Content] =
+[#1 Domain] = 0:16-0:19
+                  >---<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#1 Removal] = 0:16-0:21
+                  >-----<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#1 Trailing delimiter] = 0:19-0:21
+                     >--<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#1 Insertion delimiter] = ", "
+
+
+[#2 Content] =
+[#2 Domain] = 0:21-0:24
+                       >---<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#2 Removal] = 0:21-0:26
+                       >-----<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#2 Leading delimiter] = 0:19-0:21
+                     >--<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#2 Trailing delimiter] = 0:24-0:26
+                          >--<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#2 Insertion delimiter] = ", "
+
+
+[#3 Content] =
+[#3 Domain] = 0:26-0:29
+                            >---<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#3 Removal] = 0:24-0:29
+                          >-----<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#3 Leading delimiter] = 0:24-0:26
+                          >--<
+0| foo <- function(aaa, bbb, ccc) {}
+
+[#3 Insertion delimiter] = ", "