2021-10-29 21:25:12 +01:00
|
|
|
// This file is part of the Luau programming language and is licensed under MIT License; see LICENSE.txt for details
|
|
|
|
|
// This code is based on Lua 5.x implementation licensed under MIT License; see lua_LICENSE.txt for details
|
|
|
|
|
#pragma once
|
|
|
|
|
|
|
|
|
|
#include "lstate.h"
|
|
|
|
|
|
|
|
|
|
#define pcRel(pc, p) ((pc) ? cast_to(int, (pc) - (p)->code) - 1 : 0)
|
|
|
|
|
|
|
|
|
|
#define luaG_typeerror(L, o, opname) luaG_typeerrorL(L, o, opname)
|
|
|
|
|
#define luaG_forerror(L, o, what) luaG_forerrorL(L, o, what)
|
|
|
|
|
#define luaG_runerror(L, fmt, ...) luaG_runerrorL(L, fmt, ##__VA_ARGS__)
|
|
|
|
|
|
|
|
|
|
#define LUA_MEMERRMSG "not enough memory"
|
|
|
|
|
#define LUA_ERRERRMSG "error in error handling"
|
|
|
|
|
|
|
|
|
|
LUAI_FUNC l_noret luaG_typeerrorL(lua_State* L, const TValue* o, const char* opname);
|
|
|
|
|
LUAI_FUNC l_noret luaG_forerrorL(lua_State* L, const TValue* o, const char* what);
|
|
|
|
|
LUAI_FUNC l_noret luaG_concaterror(lua_State* L, StkId p1, StkId p2);
|
|
|
|
|
LUAI_FUNC l_noret luaG_aritherror(lua_State* L, const TValue* p1, const TValue* p2, TMS op);
|
|
|
|
|
LUAI_FUNC l_noret luaG_ordererror(lua_State* L, const TValue* p1, const TValue* p2, TMS op);
|
|
|
|
|
LUAI_FUNC l_noret luaG_indexerror(lua_State* L, const TValue* p1, const TValue* p2);
|
2022-08-04 23:35:33 +01:00
|
|
|
LUAI_FUNC l_noret luaG_methoderror(lua_State* L, const TValue* p1, const TString* p2);
|
2022-07-21 22:16:54 +01:00
|
|
|
LUAI_FUNC l_noret luaG_readonlyerror(lua_State* L);
|
2022-07-01 00:52:43 +01:00
|
|
|
|
2021-10-29 21:25:12 +01:00
|
|
|
LUAI_FUNC LUA_PRINTF_ATTR(2, 3) l_noret luaG_runerrorL(lua_State* L, const char* fmt, ...);
|
|
|
|
|
LUAI_FUNC void luaG_pusherror(lua_State* L, const char* error);
|
|
|
|
|
|
|
|
|
|
LUAI_FUNC void luaG_breakpoint(lua_State* L, Proto* p, int line, bool enable);
|
|
|
|
|
LUAI_FUNC bool luaG_onbreak(lua_State* L);
|
|
|
|
|
|
|
|
|
|
LUAI_FUNC int luaG_getline(Proto* p, int pc);
|
