Github User Fetcher 1.0.0
C Application with Server and GUI
Loading...
Searching...
No Matches
min.c File Reference
#include <stdio.h>
#include "lua.h"
#include "lauxlib.h"

Go to the source code of this file.

Functions

static int print (lua_State *L)
 
int main (void)
 

Function Documentation

◆ main()

int main ( void )

Definition at line 32 of file min.c.

33{
35 lua_register(L,"print",print);
36 if (luaL_dofile(L,NULL)!=0) fprintf(stderr,"%s\n",lua_tostring(L,-1));
37 lua_close(L);
38 return 0;
39}
#define NULL
Definition gmacros.h:924
#define luaL_dofile(L, fn)
LUA_API void lua_close(lua_State *L)
#define lua_open()
#define lua_tostring(L, i)
#define lua_register(L, n, f)
static int print(lua_State *L)
Definition min.c:12

References lua_close(), lua_open, lua_register, lua_tostring, luaL_dofile, NULL, and print().

◆ print()

static int print ( lua_State * L)
static

Definition at line 12 of file min.c.

13{
14 int n=lua_gettop(L);
15 int i;
16 for (i=1; i<=n; i++)
17 {
18 if (i>1) printf("\t");
19 if (lua_isstring(L,i))
20 printf("%s",lua_tostring(L,i));
21 else if (lua_isnil(L,i))
22 printf("%s","nil");
23 else if (lua_isboolean(L,i))
24 printf("%s",lua_toboolean(L,i) ? "true" : "false");
25 else
26 printf("%s:%p",luaL_typename(L,i),lua_topointer(L,i));
27 }
28 printf("\n");
29 return 0;
30}
LUA_API int lua_toboolean(lua_State *L, int idx)
LUA_API int lua_isstring(lua_State *L, int idx)
LUA_API const void * lua_topointer(lua_State *L, int idx)
LUA_API int lua_gettop(lua_State *L)
#define luaL_typename(L, i)
#define lua_isnil(L, n)
#define lua_isboolean(L, n)
#define printf

References lua_gettop(), lua_isboolean, lua_isnil, lua_isstring(), lua_toboolean(), lua_topointer(), lua_tostring, luaL_typename, and printf.

Referenced by main().