diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-07-08 09:43:23 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-07-08 09:43:23 -0300 |
commit | 16024861bd23ac9f837f956fbeec739878e5d895 (patch) | |
tree | 05cac8d123c6cfc05eaa56b806f18177dba39304 /lundump.h | |
parent | 3f43aaa23f9005a295056d0dce46a59565f1ef82 (diff) | |
download | lua-16024861bd23ac9f837f956fbeec739878e5d895.tar.gz lua-16024861bd23ac9f837f956fbeec739878e5d895.tar.bz2 lua-16024861bd23ac9f837f956fbeec739878e5d895.zip |
new format for numbers in precompiled code (as strings)v3.2
Diffstat (limited to 'lundump.h')
-rw-r--r-- | lundump.h | 17 |
1 files changed, 4 insertions, 13 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lundump.h,v 1.13 1999/03/29 16:16:18 lhf Exp lhf $ | 2 | ** $Id: lundump.h,v 1.15 1999/07/02 19:34:26 lhf Exp $ |
3 | ** load pre-compiled Lua chunks | 3 | ** load pre-compiled Lua chunks |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -13,6 +13,8 @@ | |||
13 | TProtoFunc* luaU_undump1 (ZIO* Z); /* load one chunk */ | 13 | TProtoFunc* luaU_undump1 (ZIO* Z); /* load one chunk */ |
14 | void luaU_badconstant (char* s, int i, TObject* o, TProtoFunc* tf); | 14 | void luaU_badconstant (char* s, int i, TObject* o, TProtoFunc* tf); |
15 | /* handle cases that cannot happen */ | 15 | /* handle cases that cannot happen */ |
16 | double luaU_str2d (char* b, char* where); | ||
17 | /* convert number from text */ | ||
16 | 18 | ||
17 | /* definitions for headers of binary files */ | 19 | /* definitions for headers of binary files */ |
18 | #define VERSION 0x32 /* last format change was in 3.2 */ | 20 | #define VERSION 0x32 /* last format change was in 3.2 */ |
@@ -30,19 +32,8 @@ void luaU_badconstant (char* s, int i, TObject* o, TProtoFunc* tf); | |||
30 | #define NUMBER_FMT "%.16g" /* LUA_NUMBER */ | 32 | #define NUMBER_FMT "%.16g" /* LUA_NUMBER */ |
31 | #endif | 33 | #endif |
32 | 34 | ||
33 | /* LUA_NUMBER | 35 | /* a multiple of PI for testing native format */ |
34 | * by default, numbers are stored in precompiled chunks as decimal strings. | ||
35 | * this is completely portable and fast enough for most applications. | ||
36 | * if you want to use this default, do nothing. | ||
37 | * if you want additional speed at the expense of portability, move the line | ||
38 | * below out of this comment. | ||
39 | #define LUAC_NATIVE | ||
40 | */ | ||
41 | |||
42 | #ifdef LUAC_NATIVE | ||
43 | /* a multiple of PI for testing number representation */ | ||
44 | /* multiplying by 1E8 gives non-trivial integer values */ | 36 | /* multiplying by 1E8 gives non-trivial integer values */ |
45 | #define TEST_NUMBER 3.14159265358979323846E8 | 37 | #define TEST_NUMBER 3.14159265358979323846E8 |
46 | #endif | ||
47 | 38 | ||
48 | #endif | 39 | #endif |