changeset 10131 | 4b4a043111f4 |
parent 10129 | cd2a64a1f4aa |
child 10143 | 3636106f5b70 |
10130:a9d509848390 | 10131:4b4a043111f4 |
---|---|
207 i,c: LongWord; |
207 i,c: LongWord; |
208 s: shortstring; |
208 s: shortstring; |
209 begin |
209 begin |
210 if lua_gettop(L) = 1 then |
210 if lua_gettop(L) = 1 then |
211 begin |
211 begin |
212 t:= lua_tolstring(L,1,@c); |
212 t:= lua_tolstring(L, 1, Psize_t(@c)); |
213 |
213 |
214 for i:= 1 to c do s[i]:= t[i-1]; |
214 for i:= 1 to c do s[i]:= t[i-1]; |
215 s[0]:= char(c); |
215 s[0]:= char(c); |
216 |
216 |
217 ParseCommand(s, true, true); |
217 ParseCommand(s, true, true); |