diff -r 98b990feec7d -r d48bbe4518e6 hedgewars/uScript.pas --- a/hedgewars/uScript.pas Wed Feb 10 17:53:21 2010 +0000 +++ b/hedgewars/uScript.pas Wed Feb 10 21:23:03 2010 +0000 @@ -37,6 +37,7 @@ procedure free_uScript; implementation +{$IFNDEF IPHONEOS} uses LuaPas in 'LuaPas.pas', uConsole, uMisc, @@ -49,7 +50,7 @@ uTeams, uKeys, typinfo; - + var luaState : Plua_State; ScriptAmmoStore : string; ScriptLoaded : boolean; @@ -525,4 +526,39 @@ lua_close(luaState); end; +{$ELSE} +procedure ScriptPrintStack; +begin +end; + +procedure ScriptClearStack; +begin +end; + +procedure ScriptLoad(name : string); +begin +end; + +procedure ScriptOnGameInit; +begin +end; + +procedure ScriptCall(fname : string); +begin +end; + +function ScriptCall(fname : string; par1, par2, par3, par4 : LongInt) : LongInt; +begin +ScriptCall:= nil +end; + +procedure init_uScript; +begin +end; + +procedure free_uScript; +begin +end; + +{$ENDIF} end.