tree-sitter and lsp-methods

test/test.tsl

@@ -35,6 +35,7 @@ private
     param2_: array of string;
 end;
 
+// 类外方法
 function MyClass.Func1(a, b);
 begin
 end;
@@ -45,11 +46,6 @@ begin
     self.P1;
 end
 
-// 属性链
-echo obj.name;
-user.profile.email;
-data.items.count;
-
 // 函数声明
 function f();                    // 无参数
 function f(a, b);               // 参数无类型
@@ -62,10 +58,21 @@ f();
 f(a, b);
 f(a: 1; b: 's');
 f(f(2, "111"));
+data.abc();
+
+// 属性链
+echo obj.name;
+user.profile.email;
+data.items.count;
+data.abc(p1, p2).def;
+obj["def"].name;
 
 // 类变量声明，三元表达式（不应该有冲突）
 a: string;
 [weakref]b: MyClass;
+a := def.acc;
+gloabl a, b: number = 1;
+var b: Saaa = "abc";
 a ? b : c;
 a ? b : c ? d : e;
 return ifnil(rpr_.Caps) ? false : rpr_.Caps.IsApplied;
@@ -79,9 +86,9 @@ select distinct ["test"] from table where ['a'] = 1 end;
 a := array(1, 2);
 b := array((1, 2), (3, 4));
 
-sql += "update ts_xbcheck result set isvalid = "$status$remark$" where checkid in ('"$array2str
+sql += "update ts_xbcheck result set isvalid = " $ status $ remark $ " where checkid in ('"$array2str
 (checkid[(i-1)*len:], "','")$"');\r\n"
-sql += 123;
+sql += abc;
 
 // tsl-web块
 <?tslx>

test/test_lsp.tsl

@@ -0,0 +1,5 @@
+uses abc;
+var v1;
+global abc;
+var f;
+var dddd;