Contents

/*
* min.c -- a minimal Lua interpreter
* loads stdin only with minimal error handling.
* no interaction, and no standard library, only a "print" function.
*/

#include <stdio.h>

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

static int print(lua_State *L)
{
 int n=lua_gettop(L);
 int i;
 for (i=1; i<=n; i++)
 {
  if (i>1) printf("\t");
  if (lua_isstring(L,i))
   printf("%s",lua_tostring(L,i));
  else if (lua_isnil(L,i))
   printf("%s","nil");
  else if (lua_isboolean(L,i))
   printf("%s",lua_toboolean(L,i) ? "true" : "false");
  else
   printf("%s:%p",luaL_typename(L,i),lua_topointer(L,i));
 }
 printf("\n");
 return 0;
}

int main(void)
{
 lua_State *L=lua_open();
 lua_register(L,"print",print);
 if (luaL_dofile(L,NULL)!=0) fprintf(stderr,"%s\n",lua_tostring(L,-1));
 lua_close(L);
 return 0;
}

Version data entries

12 entries across 12 versions & 1 rubygems

Version	Path
Tamar-0.7.18	src/lua/etc/min.c
Tamar-0.7.17	src/lua/etc/min.c
Tamar-0.7.16	src/lua/etc/min.c
Tamar-0.7.14	src/lua/etc/min.c
Tamar-0.7.13	src/lua/etc/min.c
Tamar-0.7.12	src/lua/etc/min.c
Tamar-0.7.11	src/lua/etc/min.c
Tamar-0.7.10	src/lua/etc/min.c
Tamar-0.7.9	src/lua/etc/min.c
Tamar-0.7.8	src/lua/etc/min.c
Tamar-0.7.7	src/lua/etc/min.c
Tamar-0.7.6	src/lua/etc/min.c