1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
---
source: src/syntax/library/functions/string/strcomp.rs
expression: tree
---
root:
kind: Root
children:
- kind: Newline
text: "\n"
- kind: SubStatement
children:
- kind: SubKeyword
text: Sub
- kind: Whitespace
text: " "
- kind: Identifier
text: Test
- kind: ParameterList
children:
- kind: LeftParenthesis
text: (
- kind: RightParenthesis
text: )
- kind: Newline
text: "\n"
- kind: StatementList
children:
- kind: WithStatement
children:
- kind: Whitespace
text: " "
- kind: WithKeyword
text: With
- kind: Whitespace
text: " "
- kind: Identifier
text: obj
- kind: Newline
text: "\n"
- kind: StatementList
children:
- kind: IfStatement
children:
- kind: Whitespace
text: " "
- kind: IfKeyword
text: If
- kind: Whitespace
text: " "
- kind: CallExpression
children:
- kind: Identifier
text: StrComp
- kind: LeftParenthesis
text: (
- kind: ArgumentList
children:
- kind: Argument
children:
- kind: IdentifierExpression
children:
- kind: PeriodOperator
text: "."
- kind: NameStatement
children:
- kind: NameKeyword
text: Name
- kind: Comma
text: ","
- kind: Whitespace
text: " "
- kind: Identifier
text: targetName
- kind: Comma
text: ","
- kind: Whitespace
text: " "
- kind: Identifier
text: vbTextCompare
- kind: RightParenthesis
text: )
- kind: Whitespace
text: " "
- kind: EqualityOperator
text: "="
- kind: Whitespace
text: " "
- kind: IntegerLiteral
text: "0"
- kind: Whitespace
text: " "
- kind: ThenKeyword
text: Then
- kind: Newline
text: "\n"
- kind: Whitespace
text: " "
- kind: AssignmentStatement
children:
- kind: IdentifierExpression
children:
- kind: Identifier
text: found
- kind: Whitespace
text: " "
- kind: EqualityOperator
text: "="
- kind: Whitespace
text: " "
- kind: BooleanLiteralExpression
children:
- kind: TrueKeyword
text: "True"
- kind: Newline
text: "\n"
- kind: Whitespace
text: " "
- kind: EndKeyword
text: End
- kind: IfStatement
children:
- kind: Whitespace
text: " "
- kind: IfKeyword
text: If
- kind: IdentifierExpression
children:
- kind: Newline
text: "\n"
- kind: Whitespace
text: " "
- kind: EndKeyword
text: End
- kind: WithStatement
children:
- kind: Whitespace
text: " "
- kind: WithKeyword
text: With
- kind: Newline
text: "\n"
- kind: StatementList
children:
- kind: Unknown
text: End
- kind: Whitespace
text: " "
- kind: Unknown
text: Sub
- kind: Newline
text: "\n"