gistfile1.c

#include <lua.h>
#include <lauxlib.h>
#define __USE_GNU
#include <dlfcn.h>

LUALIB_API int luaopen_my_module_core (lua_State *L)
{
  /* TODO - Windows version, DllMain, then GetModuleFileName */
  Dl_info dl_info;
  dladdr((void *)luaopen_my_module_core, &dl_info);
  lua_pushstring(L, dl_info.dli_fname);
  return 1;
}