C# ILuaState.Remove方法代码示例

 /*
 ** Try to compile line on the stack as 'return <line>'; on return, stack
 ** has either compiled chunk or original line (if compilation failed).
 */
 static LuaStatus addreturn(ILuaState L)
 {
     LuaStatus status;
     int len; string line;
     L.PushLiteral("return ");
     L.PushValue(-2);  /* duplicate line */
     L.Concat(2);  /* new line is "return ..." */
     line = L.ToLString(-1, out len);
     if ((status = L.LoadBuffer(line, len, "=stdin")) == LuaStatus.OK)
     {
         L.Remove(-3);  /* remove original line */
         //line += sizeof("return")/sizeof(char);  /* remove 'return' for history */
         line = line.Substring("return".Length);
         if (!String.IsNullOrEmpty(line))  /* non empty? */
             lua_saveline(L, line);  /* keep history */
     }
     else
         L.Pop(2);  /* remove result from 'luaL_loadbuffer' and new line */
     return status;
 }

		private static string SearchPath( ILuaState lua,
			string name, string path, string sep, string dirsep )
		{
			var sb = new StringBuilder(); // to build error message
			if( !String.IsNullOrEmpty(sep) ) // non-empty separator?
				name = name.Replace( sep, dirsep ); // replace it by `dirsep'
			int pos = 0;
			while(PushNextTemplate(lua, path, ref pos))
			{
				var template = lua.ToString(-1);
				string filename = template.Replace( LUA_PATH_MARK, name );
				lua.Remove( -1 ); // remove path template
				if( Readable( filename ) ) // does file exist and is readable?
					return filename; // return that file name
				lua.PushString( string.Format( "\n\tno file '{0}'", filename) );
				lua.Remove( -2 ); // remove file name
				sb.Append( lua.ToString(-1) ); // concatenate error msg. entry
			}
			lua.PushString( sb.ToString() ); // create error message
			return null; // not found
		}

 /*
 ** Read a line and try to load (compile) it first as an expression (by
 ** adding "return " in front of it) and second as a statement. Return
 ** the final status of load/call with the resulting function (if any)
 ** in the top of the stack.
 */
 static LuaStatus loadline(ILuaState L)
 {
     LuaStatus status;
     L.SetTop(0);
     if (0 == pushline(L, true))
         return (LuaStatus)(-1);  /* no input */
     if ((status = addreturn(L)) != LuaStatus.OK)  /* 'return ...' did not work? */
         status = multiline(L);  /* try as command, maybe with continuation lines */
     L.Remove(1);  /* remove line from the stack */
     L.Assert(L.GetTop() == 1);
     return status;
 }

 /*
 ** Push on the stack the contents of table 'arg' from 1 to #arg
 */
 static int pushargs(ILuaState L)
 {
     int i, n;
     if (L.GetGlobal("arg") != LuaType.Table)
         L.Error("'arg' is not a table");
     n = L.LLen(-1);
     L.CheckStack(n + 3, "too many arguments to script");
     for (i = 1; i <= n; i++)
         L.RawGetI(-i, i);
     L.Remove(-i);  /* remove table from the stack */
     return n;
 }

 /*
 ** Interface to 'lua_pcall', which sets appropriate message function
 ** and C-signal handler. Used to run all chunks.
 */
 static LuaStatus docall(ILuaState L, int narg, int nres)
 {
     LuaStatus status = 0;
     int base_ = L.GetTop() - narg;  /* function index */
     L.PushFunction(msghandler);  /* push message handler */
     L.Insert(base_);  /* put it under function and args */
     globalL = L;  /* to be available to 'laction' */
     Console.CancelKeyPress += Console_CancelKeyPress;
     //signal(SIGINT, laction);  /* set C-signal handler */
     status = L.PCall(narg, nres, base_);
     //signal(SIGINT, SIG_DFL); /* reset C-signal handler */
     Console.CancelKeyPress -= Console_CancelKeyPress;
     L.Remove(base_);  /* remove message handler from the stack */
     return status;
 }