--- a/hedgewars/uScript.pas	Tue Feb 11 22:05:03 2014 +0400
+++ b/hedgewars/uScript.pas	Wed Feb 12 00:50:15 2014 +0400
@@ -209,7 +209,7 @@
 begin
     if lua_gettop(L) = 1 then
         begin
-        t:= lua_tolstring(L,1,@c);
+        t:= lua_tolstring(L, 1, Psize_t(@c));
 
         for i:= 1 to c do s[i]:= t[i-1];
         s[0]:= char(c);