Fix crash

git-svn-id: http://svn.net-core.org/repos/t-engine4@2669 51575b47-30f0-44d4-a5cc-537603b46e54

src/main.c

@@ -122,6 +122,7 @@ int docall (lua_State *L, int narg, int nret)
 	{
 		stackDump(L);
 //		assert(0);
+		lua_settop(L, base);
 	}
 	return status;
 }