[LUA] Removed another outdated lua function

[simgrid.git] / src / bindings / lua / lua_host.c

diff --git a/src/bindings/lua/lua_host.c b/src/bindings/lua/lua_host.c
index b9d01a9..af669e7 100644 (file)
--- a/src/bindings/lua/lua_host.c
+++ b/src/bindings/lua/lua_host.c
@@ -90,7 +90,7 @@ static int l_host_get_name(lua_State * L)
 static int l_host_number(lua_State * L)
 {
   xbt_dynar_t hosts = MSG_hosts_as_dynar();
-  lua_pushnumber(L, xbt_dynar_length(hosts));
+  lua_pushinteger(L, xbt_dynar_length(hosts));
   xbt_dynar_free(&hosts);
   return 1;
 }
@@ -118,31 +118,6 @@ static int l_host_at(lua_State * L)
   return 1;
 }
 
-/**
- * \brief Returns the host where the current process is located.
- * \param L a Lua state
- * \return number of values returned to Lua
- *
- * - Return value (host): the current host
- */
-static int l_host_self(lua_State * L)
-{
-                                  /* -- */
-  msg_host_t host = MSG_host_self();
-  lua_newtable(L);
-                                  /* table */
-  msg_host_t* lua_host = (msg_host_t*) lua_newuserdata(L, sizeof(msg_host_t));
-                                  /* table ud */
-  *lua_host = host;
-  luaL_getmetatable(L, HOST_MODULE_NAME);
-                                  /* table ud mt */
-  lua_setmetatable(L, -2);
-                                  /* table ud */
-  lua_setfield(L, -2, "__simgrid_host");
-                                  /* table */
-  return 1;
-}
-
 /**
  * \brief Returns the value of a host property.
  * \param L a Lua state
@@ -160,20 +135,6 @@ static int l_host_get_property_value(lua_State * L)
   return 1;
 }
 
-/**
- * \brief Makes the current process sleep for a while.
- * \param L a Lua state
- * \return number of values returned to Lua
- *
- * - Argument 1 (number): duration of the sleep
- */
-static int l_host_sleep(lua_State *L)
-{
-  int time = luaL_checknumber(L, 1);
-  MSG_process_sleep(time);
-  return 0;
-}
-
 /**
  * \brief Destroys a host.
  * \param L a Lua state
@@ -193,12 +154,9 @@ static const luaL_Reg host_functions[] = {
   {"name", l_host_get_name},
   {"number", l_host_number},
   {"at", l_host_at},
-  {"self", l_host_self},
   {"get_prop_value", l_host_get_property_value},
-  {"sleep", l_host_sleep},
   {"destroy", l_host_destroy},
   // Bypass XML Methods
-  {"set_function", console_set_function},
   {"set_property", console_host_set_property},
   {NULL, NULL}
 };