hedgewars/LuaPas.pas
changeset 10127 7f29a65aa1e4
parent 10124 aabd1b75d5a3
child 10230 361d36ec5181
equal deleted inserted replaced
10126:2fa3bb7785ee 10127:7f29a65aa1e4
   926 begin
   926 begin
   927     lua_tostring := StrPas(lua_tolstring(L, idx, nil));
   927     lua_tostring := StrPas(lua_tolstring(L, idx, nil));
   928 end;
   928 end;
   929 
   929 
   930 function lua_tostringA(L : Plua_State; idx : LongInt) : ansistring;
   930 function lua_tostringA(L : Plua_State; idx : LongInt) : ansistring;
   931 begin
   931 var p: PChar;
   932     lua_tostringA := ansistring(lua_tolstring(L, idx, nil));
   932 begin
       
   933     p:= lua_tolstring(L, idx, nil);
       
   934     lua_tostringA := ansistring(p);
   933 end;
   935 end;
   934 
   936 
   935 function lua_open : Plua_State;
   937 function lua_open : Plua_State;
   936 begin
   938 begin
   937     lua_open := luaL_newstate;
   939     lua_open := luaL_newstate;