** Returns the position of the instruction "controlling" a given ** jump (that is, its condition), or the jump itself if it is ** unconditional. */

** Check whether table being indexed by instruction 'i' is the ** environment '_ENV' */

---------------------------------------------------*/

** Initialize Header */

** Check whether expression 'e' is a literal integer in ** proper range to fit in register sC */

@brief return whether value is a floating-point number @sa https://json.nlohmann.me/api/basic_json/is_number_float/

@brief return whether value is an integer number @sa https://json.nlohmann.me/api/basic_json/is_number_integer/

** Find a "name" for the constant 'c'. */

** Prints an error message, adding the program name in front of it ** (if present) */

Core reassembly logic. Validates the given message fragment and appends it to the reassembly table fragment list.

These functions implement a double linked list for the local objects. */

** Look for a C function named 'sym' in a dynamically loaded library ** 'path'. ** First, check whether the library is already loaded; if not, try **

** Change collector mode to 'newmode'. */

** Performs a full GC cycle; if 'isemergency', set a flag to avoid ** some operations which could change the interpreter state in some ** unexpected w

** Calls 'luaF_close' in protected mode. Return the original status ** or, in case of errors, the new status. */

** Call the C function 'func' in protected mode, restoring basic ** thread information ('allowhook', etc.) and in particular ** its stack level in cas

** If stack size is more than 3 times the current use, reduce that size ** to twice the current use. (So, the final stack size is at most 2/3 the ** p

** Close all upvalues up to the given stack level. */

** Insert a variable in the list of to-be-closed variables. */

** beware: when using this function you probably need to check a GC ** barrier and invalidate the TM cache. */

** Emit a "load constant" instruction, using either 'OP_LOADK' ** (if constant index 'k' fits in 18 bits) or an 'OP_LOADKX' ** instruction with "extra

** Try to make 'e' a K expression with an index in the range of R/K ** indices. Return true iff succeeded. */

** Ensures final expression result is in a valid R/K index ** (that is, it is either in a register or in 'k' with an index ** in the range of R/K indi

** Ensures final expression result is either in a register ** or in an upvalue. */

** Emit code to go through if 'e' is true, jump otherwise. */

** Check whether expression 'e' is a literal integer. */

** Emit a SETLIST instruction. ** 'base' is register that keeps table; ** 'nelems' is #table plus those to be stored now; ** 'tostore' is number of va

** Stripped-down 'require': After checking "loaded" table, calls 'openf' ** to open a module, registers the result in 'package.loaded' table and, ** i

** The use of 'lua_pushfstring' ensures this function does not ** need reserved stack space when called. */

** Calls an order tag method. ** For lessequal, LUA_COMPAT_LT_LE keeps compatibility with old ** behavior: if there is no '__le', try '__lt', based on

** Shift left operation. (Shift right just negates 'y'.) */

** Creates a new string and anchors it in scanner's table so that it ** will not be collected until the end of the compilation; by that time ** it sho