Add R6 variables in test

Author: lionel-

crates/ark/src/lsp/indexer.rs

@@ -499,12 +499,14 @@ class <- R6Class(
         },
         public_method = function() {
             2
-        }
+        },
+        public_variable = NA
     ),
     private = list(
         private_method = function() {
             1
-        }
+        },
+        private_variable = NA
     ),
     other = list(
         other_method = function() {

crates/ark/src/lsp/snapshots/ark__lsp__indexer__tests__index_r6class.snap

@@ -39,11 +39,11 @@ expression: entries
         key: "private_method",
         range: Range {
             start: Position {
-                line: 11,
+                line: 12,
                 character: 8,
             },
             end: Position {
-                line: 11,
+                line: 12,
                 character: 22,
             },
         },