/*
** compile with
** Linux: gcc -Wall -O2 -I.. -ansi -shared -o lib1.so lib1.c
** Mac OS X: export MACOSX_DEPLOYMENT_TARGET=10.3
**     gcc -bundle -undefined dynamic_lookup -Wall -O2 -o lib1.so lib1.c
*/


#include "lua.h"
#include "lauxlib.h"

static int id (lua_State *L) {
  return lua_gettop(L);
}


static const struct luaL_reg funcs[] = {
  {"id", id},
  {NULL, NULL}
};


int anotherfunc (lua_State *L) {
  lua_pushfstring(L, "%f%f\n", lua_tonumber(L, 1), lua_tonumber(L, 2));
  return 1;
} 


int luaopen_lib1_sub (lua_State *L) {
  luaL_register(L, "lib1.sub", funcs + 1);
  return 1;
}
  

int luaopen_lib1 (lua_State *L) {
  luaL_register(L, "lib1", funcs);
  return 1;
}


