|
native Lua
0.4.0
Lua on the platform you use with the compiler you choose
|
#include "lprefix.h"#include <ctype.h>#include <errno.h>#include <stdio.h>#include <stdlib.h>#include <string.h>#include "lua.h"#include "lauxlib.h"#include "lobject.h"#include "lstate.h"#include "lundump.h"#include "config.h"#include "ldebug.h"#include "lopcodes.h"
Macros | |
| #define | luac_c |
| #define | LUA_CORE |
| #define | luaU_print PrintFunction |
| #define | PROGNAME "luac" /* default program name */ |
| #define | OUTPUT PROGNAME ".out" /* default output file */ |
| #define | IS(s) (strcmp(argv[i],s)==0) |
| #define | FUNCTION "(function()end)();" |
| #define | toproto(L, i) getproto(L->top+(i)) |
| #define | luac_c |
| #define | LUA_CORE |
| #define | VOID(p) ((const void*)(p)) |
| #define | UPVALNAME(x) ((f->upvalues[x].name) ? getstr(f->upvalues[x].name) : "-") |
| #define | MYK(x) (-1-(x)) |
| #define | SS(x) ((x==1)?"":"s") |
| #define | S(x) (int)(x),SS(x) |
Functions | |
| int | main (int argc, char *argv[]) |
| #define FUNCTION "(function()end)();" |
| #define IS | ( | s | ) | (strcmp(argv[i],s)==0) |
| #define LUA_CORE |
| #define LUA_CORE |
| #define luac_c |
| #define luac_c |
| #define luaU_print PrintFunction |
| #define MYK | ( | x | ) | (-1-(x)) |
| #define OUTPUT PROGNAME ".out" /* default output file */ |
| #define PROGNAME "luac" /* default program name */ |
| #define S | ( | x | ) | (int)(x),SS(x) |
| #define SS | ( | x | ) | ((x==1)?"":"s") |
| #define toproto | ( | L, | |
| i | |||
| ) | getproto(L->top+(i)) |
| #define UPVALNAME | ( | x | ) | ((f->upvalues[x].name) ? getstr(f->upvalues[x].name) : "-") |
| #define VOID | ( | p | ) | ((const void*)(p)) |
| int main | ( | int | argc, |
| char * | argv[] | ||
| ) |
1.8.20