vendor: 引入 Lua 4.0.1 官方源码 + 移植评估文档 (lua_4.0 分支)

- Lua 4.0 是首个引入 lua_State* 的版本, 但 API 与 5.x 代际差异大
- 桥接层适配要点与工作量评估见 doc/ADAPTATION-lua40.md
- 本分支暂不承诺可编译, 后续按需移植

lib/lua/lundump.h

@@ -1,40 +1,35 @@
 /*
-** $Id: lundump.h $
-** load precompiled Lua chunks
+** $Id: lundump.h,v 1.21 2000/10/31 16:57:23 lhf Exp $
+** load pre-compiled Lua chunks
 ** See Copyright Notice in lua.h
 */
 
 #ifndef lundump_h
 #define lundump_h
 
-#include <limits.h>
-
-#include "llimits.h"
 #include "lobject.h"
 #include "lzio.h"
 
+/* load one chunk */
+Proto* luaU_undump (lua_State* L, ZIO* Z);
 
-/* data to catch conversion errors */
-#define LUAC_DATA	"\x19\x93\r\n\x1a\n"
+/* find byte order */
+int luaU_endianess (void);
 
-#define LUAC_INT	-0x5678
-#define LUAC_INST	0x12345678
-#define LUAC_NUM	cast_num(-370.5)
+/* definitions for headers of binary files */
+#define	VERSION		0x40		/* last format change was in 4.0 */
+#define	VERSION0	0x40		/* last major  change was in 4.0 */
+#define ID_CHUNK	27		/* binary files start with ESC... */
+#define	SIGNATURE	"Lua"		/* ...followed by this signature */
 
-/*
-** Encode major-minor version in one byte, one nibble for each
-*/
-#define LUAC_VERSION	(LUA_VERSION_MAJOR_N*16+LUA_VERSION_MINOR_N)
+/* formats for error messages */
+#define SOURCE_FMT	"<%d:%.99s>"
+#define SOURCE		tf->lineDefined,tf->source->str
+#define IN_FMT		" in %p " SOURCE_FMT
+#define IN		tf,SOURCE
 
-#define LUAC_FORMAT	0	/* this is the official format */
-
-
-/* load one chunk; from lundump.c */
-LUAI_FUNC LClosure* luaU_undump (lua_State* L, ZIO* Z, Table *anchor,
-                                 const char* name, int fixed);
-
-/* dump one chunk; from ldump.c */
-LUAI_FUNC int luaU_dump (lua_State* L, const Proto* f, lua_Writer w,
-                         void* data, int strip);
+/* a multiple of PI for testing native format */
+/* multiplying by 1E8 gives non-trivial integer values */
+#define	TEST_NUMBER	3.14159265358979323846E8
 
 #endif