* make header */
| 10115 | * make header |
| 10116 | */ |
| 10117 | void luaU_header (char* h) |
| 10118 | { |
| 10119 | int x=1; |
| 10120 | memcpy(h,LUA_SIGNATURE,sizeof(LUA_SIGNATURE)-1); |
| 10121 | h+=sizeof(LUA_SIGNATURE)-1; |
| 10122 | *h++=(char)LUAC_VERSION; |
| 10123 | *h++=(char)LUAC_FORMAT; |
| 10124 | *h++=(char)*(char*)&x; /* endianness */ |
| 10125 | *h++=(char)sizeof(int); |
| 10126 | *h++=(char)sizeof(size_t); |
| 10127 | *h++=(char)sizeof(Instruction); |
| 10128 | *h++=(char)sizeof(lua_Number); |
| 10129 | *h++=(char)(((lua_Number)0.5)==0); /* is lua_Number integral? */ |
| 10130 | } |
| 10131 | /* |
| 10132 | ** $Id: lzio.c,v 1.31.1.1 2007/12/27 13:02:25 roberto Exp $ |
| 10133 | ** a generic input stream interface |
no outgoing calls
no test coverage detected