diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2012-11-20 17:34:23 +0000 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2012-11-20 17:34:23 +0000 |
commit | 0ff561f3324df2841c90e65fb994294d2ddcfca0 (patch) | |
tree | 1f462d1d71c01952124b32ab2707541f9ed3d4ff | |
parent | 1f984509952865632f434b4349f679a2e4a42935 (diff) | |
download | libguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.tar.gz libguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.tar.xz libguestfs-0ff561f3324df2841c90e65fb994294d2ddcfca0.zip |
lua: Replace internal lua_guestfs_* functions with guestfs_lua_*.
This is just code motion. It just ensures there is no possible
conflict with lua_* symbols.
-rw-r--r-- | generator/lua.ml | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/generator/lua.ml b/generator/lua.ml index c7ee925a..88748ae1 100644 --- a/generator/lua.ml +++ b/generator/lua.ml @@ -50,11 +50,11 @@ let generate_lua_c () = #include <guestfs.h> -#define LUA_GUESTFS_HANDLE \"guestfs handle\" +#define GUESTFS_LUA_HANDLE \"guestfs handle\" /* This struct is managed on the Lua heap. If the GC collects it, * the Lua '__gc' function is called which ends up calling - * lua_guestfs_finalizer. + * guestfs_lua_finalizer. * * There is also an entry in the Lua registry, indexed by 'g' * (allocated on demand) which stores per-handle Lua data. See @@ -121,7 +121,7 @@ static void push_event (lua_State *L, uint64_t event); /* Create a new connection. */ static int -lua_guestfs_create (lua_State *L) +guestfs_lua_create (lua_State *L) { guestfs_h *g; struct userdata *u; @@ -148,7 +148,7 @@ lua_guestfs_create (lua_State *L) guestfs_set_error_handler (g, NULL, NULL); u = lua_newuserdata (L, sizeof (struct userdata)); - luaL_getmetatable (L, LUA_GUESTFS_HANDLE); + luaL_getmetatable (L, GUESTFS_LUA_HANDLE); assert (lua_type (L, -1) == LUA_TTABLE); lua_setmetatable (L, -2); @@ -167,7 +167,7 @@ close_handle (lua_State *L, guestfs_h *g) /* Finalizer. */ static int -lua_guestfs_finalizer (lua_State *L) +guestfs_lua_finalizer (lua_State *L) { struct userdata *u = get_handle (L, 1); struct event_state *es, *es_next; @@ -187,7 +187,7 @@ lua_guestfs_finalizer (lua_State *L) /* Explicit close. */ static int -lua_guestfs_close (lua_State *L) +guestfs_lua_close (lua_State *L) { struct userdata *u = get_handle (L, 1); @@ -284,7 +284,7 @@ free_per_handle_table (lua_State *L, guestfs_h *g) /* User cancel. */ static int -lua_guestfs_user_cancel (lua_State *L) +guestfs_lua_user_cancel (lua_State *L) { struct userdata *u = get_handle (L, 1); @@ -296,7 +296,7 @@ lua_guestfs_user_cancel (lua_State *L) /* Set an event callback. */ static int -lua_guestfs_set_event_callback (lua_State *L) +guestfs_lua_set_event_callback (lua_State *L) { struct userdata *u = get_handle (L, 1); guestfs_h *g = u->g; @@ -401,7 +401,7 @@ event_callback_wrapper (guestfs_h *g, /* Delete an event callback. */ static int -lua_guestfs_delete_event_callback (lua_State *L) +guestfs_lua_delete_event_callback (lua_State *L) { struct userdata *u = get_handle (L, 1); guestfs_h *g = u->g; @@ -425,7 +425,7 @@ lua_guestfs_delete_event_callback (lua_State *L) fun { name = name; style = (ret, args, optargs as style); c_function = c_function; c_optarg_prefix = c_optarg_prefix } -> pr "static int\n"; - pr "lua_guestfs_%s (lua_State *L)\n" name; + pr "guestfs_lua_%s (lua_State *L)\n" name; pr "{\n"; (match ret with @@ -616,7 +616,7 @@ get_handle (lua_State *L, int index) { struct userdata *u; - u = luaL_checkudata (L, index, LUA_GUESTFS_HANDLE); + u = luaL_checkudata (L, index, GUESTFS_LUA_HANDLE); return u; } @@ -852,27 +852,27 @@ push_event (lua_State *L, uint64_t event) * See: http://article.gmane.org/gmane.comp.lang.lua.general/95065 */ static luaL_Reg metamethods[] = { - { \"__gc\", lua_guestfs_finalizer }, + { \"__gc\", guestfs_lua_finalizer }, { NULL, NULL } }; /* Module functions. */ static luaL_Reg functions[] = { - { \"create\", lua_guestfs_create }, + { \"create\", guestfs_lua_create }, { NULL, NULL } }; /* Methods. */ static luaL_Reg methods[] = { - { \"close\", lua_guestfs_close }, - { \"user_cancel\", lua_guestfs_user_cancel }, - { \"set_event_callback\", lua_guestfs_set_event_callback }, - { \"delete_event_callback\", lua_guestfs_delete_event_callback }, + { \"close\", guestfs_lua_close }, + { \"user_cancel\", guestfs_lua_user_cancel }, + { \"set_event_callback\", guestfs_lua_set_event_callback }, + { \"delete_event_callback\", guestfs_lua_delete_event_callback }, "; List.iter ( - fun { name = name } -> pr " { \"%s\", lua_guestfs_%s },\n" name name + fun { name = name } -> pr " { \"%s\", guestfs_lua_%s },\n" name name ) all_functions_sorted; pr "\ @@ -903,7 +903,7 @@ luaopen_guestfs (lua_State *L) char v[256]; /* Create metatable. */ - luaL_newmetatable (L, LUA_GUESTFS_HANDLE); + luaL_newmetatable (L, GUESTFS_LUA_HANDLE); luaL_register (L, NULL, metamethods); /* Create methods table. */ |