hedgewars/LuaPas.pas
changeset 2948 3f21a9dc93d0
parent 2924 908851e59958
child 3043 3acdb4dac6eb
equal deleted inserted replaced
2947:803b277e4894 2948:3f21a9dc93d0
    88 ** CHANGE it if you have a better definition for non-POSIX/non-Windows
    88 ** CHANGE it if you have a better definition for non-POSIX/non-Windows
    89 ** systems.
    89 ** systems.
    90 */
    90 */
    91 #include <io.h>
    91 #include <io.h>
    92 #include <stdio.h>
    92 #include <stdio.h>
    93 #define lua_stdin_is_tty()	_isatty(_fileno(stdin))
    93 #define lua_stdin_is_tty()  _isatty(_fileno(stdin))
    94 *)
    94 *)
    95 const
    95 const
    96   lua_stdin_is_tty = TRUE;
    96   lua_stdin_is_tty = TRUE;
    97 
    97 
    98 (*****************************************************************************)
    98 (*****************************************************************************)
   163   LUA_TLIGHTUSERDATA = 2;
   163   LUA_TLIGHTUSERDATA = 2;
   164   LUA_TNUMBER        = 3;
   164   LUA_TNUMBER        = 3;
   165   LUA_TSTRING        = 4;
   165   LUA_TSTRING        = 4;
   166   LUA_TTABLE         = 5;
   166   LUA_TTABLE         = 5;
   167   LUA_TFUNCTION      = 6;
   167   LUA_TFUNCTION      = 6;
   168   LUA_TUSERDATA	     = 7;
   168   LUA_TUSERDATA      = 7;
   169   LUA_TTHREAD        = 8;
   169   LUA_TTHREAD        = 8;
   170 
   170 
   171   (* minimum Lua stack available to a C function *)
   171   (* minimum Lua stack available to a C function *)
   172   LUA_MINSTACK = 20;
   172   LUA_MINSTACK = 20;
   173 
   173 
   358 const
   358 const
   359   LUA_GCSTOP       = 0;
   359   LUA_GCSTOP       = 0;
   360   LUA_GCRESTART    = 1;
   360   LUA_GCRESTART    = 1;
   361   LUA_GCCOLLECT    = 2;
   361   LUA_GCCOLLECT    = 2;
   362   LUA_GCCOUNT      = 3;
   362   LUA_GCCOUNT      = 3;
   363   LUA_GCCOUNTB	   = 4;
   363   LUA_GCCOUNTB     = 4;
   364   LUA_GCSTEP       = 5;
   364   LUA_GCSTEP       = 5;
   365   LUA_GCSETPAUSE   = 6;
   365   LUA_GCSETPAUSE   = 6;
   366   LUA_GCSETSTEPMUL = 7;
   366   LUA_GCSETSTEPMUL = 7;
   367 
   367 
   368 function lua_gc(L : Plua_State; what, data : LongInt) : LongInt;
   368 function lua_gc(L : Plua_State; what, data : LongInt) : LongInt;