1998-01-14 18:49:01 +03:00
|
|
|
/*
|
2001-02-23 20:17:25 +03:00
|
|
|
** $Id: lundump.h,v 1.19 2000/11/07 12:44:44 roberto Exp roberto $
|
1998-01-14 18:49:01 +03:00
|
|
|
** load pre-compiled Lua chunks
|
|
|
|
** See Copyright Notice in lua.h
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef lundump_h
|
|
|
|
#define lundump_h
|
|
|
|
|
|
|
|
#include "lobject.h"
|
|
|
|
#include "lzio.h"
|
|
|
|
|
1999-12-02 22:11:51 +03:00
|
|
|
/* load one chunk */
|
2000-09-04 22:53:41 +04:00
|
|
|
Proto* luaU_undump (lua_State* L, ZIO* Z);
|
1999-12-02 22:11:51 +03:00
|
|
|
|
2000-09-04 22:53:41 +04:00
|
|
|
/* find byte order */
|
|
|
|
int luaU_endianess (void);
|
1999-03-31 00:29:34 +04:00
|
|
|
|
|
|
|
/* definitions for headers of binary files */
|
2000-04-25 20:44:31 +04:00
|
|
|
#define VERSION 0x40 /* last format change was in 4.0 */
|
|
|
|
#define VERSION0 0x40 /* last major change was in 4.0 */
|
1999-03-31 00:29:34 +04:00
|
|
|
#define ID_CHUNK 27 /* binary files start with ESC... */
|
2001-02-23 20:17:25 +03:00
|
|
|
#define SIGNATURE l_s("Lua") /* ...followed by this signature */
|
1998-01-14 18:49:01 +03:00
|
|
|
|
1999-04-14 00:16:37 +04:00
|
|
|
/* formats for error messages */
|
2001-02-23 20:17:25 +03:00
|
|
|
#define SOURCE_FMT l_s("<%d:%.99s>")
|
2000-11-07 15:44:44 +03:00
|
|
|
#define SOURCE tf->lineDefined,tf->source->str
|
2001-02-23 20:17:25 +03:00
|
|
|
#define IN_FMT l_s(" in %p ") SOURCE_FMT
|
2000-11-07 15:44:44 +03:00
|
|
|
#define IN tf,SOURCE
|
1998-01-14 18:49:01 +03:00
|
|
|
|
1999-07-08 16:43:23 +04:00
|
|
|
/* a multiple of PI for testing native format */
|
1999-03-31 00:29:34 +04:00
|
|
|
/* multiplying by 1E8 gives non-trivial integer values */
|
|
|
|
#define TEST_NUMBER 3.14159265358979323846E8
|
|
|
|
|
|
|
|
#endif
|