diff options
| author | Luiz Henrique de Figueiredo <lhf@tecgraf.puc-rio.br> | 1996-11-14 11:33:15 -0200 |
|---|---|---|
| committer | Luiz Henrique de Figueiredo <lhf@tecgraf.puc-rio.br> | 1996-11-14 11:33:15 -0200 |
| commit | 679eddf2961250ee47aa81d754bddf888a62da07 (patch) | |
| tree | 43bef1f7f82578ac631a7079fba6bc5dd7783efc | |
| parent | d991def36c313a5d10bc9f6769fc3ec2307dd60b (diff) | |
| download | lua-679eddf2961250ee47aa81d754bddf888a62da07.tar.gz lua-679eddf2961250ee47aa81d754bddf888a62da07.tar.bz2 lua-679eddf2961250ee47aa81d754bddf888a62da07.zip | |
| -rw-r--r-- | undump.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -3,7 +3,7 @@ | |||
| 3 | ** load bytecodes from files | 3 | ** load bytecodes from files |
| 4 | */ | 4 | */ |
| 5 | 5 | ||
| 6 | char* rcs_undump="$Id: undump.c,v 1.16 1996/11/07 14:13:28 lhf Exp lhf $"; | 6 | char* rcs_undump="$Id: undump.c,v 1.17 1996/11/14 11:44:34 lhf Exp lhf $"; |
| 7 | 7 | ||
| 8 | #include <stdio.h> | 8 | #include <stdio.h> |
| 9 | #include <string.h> | 9 | #include <string.h> |
| @@ -259,7 +259,7 @@ static void LoadHeader(FILE* D) /* TODO: error handling */ | |||
| 259 | int oldsizeofF=getc(D); | 259 | int oldsizeofF=getc(D); |
| 260 | int oldsizeofP=getc(D); | 260 | int oldsizeofP=getc(D); |
| 261 | if (oldsizeofF!=4) lua_error("sizeof(float)!=4. not an IEEE machine?"); | 261 | if (oldsizeofF!=4) lua_error("sizeof(float)!=4. not an IEEE machine?"); |
| 262 | if (oldsizeofFP!=sizeof(TFunc*)) /* TODO: pack */ | 262 | if (oldsizeofP!=sizeof(TFunc*)) /* TODO: pack */ |
| 263 | lua_error("different pointer sizes"); | 263 | lua_error("different pointer sizes"); |
| 264 | } | 264 | } |
| 265 | fread(&w,sizeof(w),1,D); /* test word */ | 265 | fread(&w,sizeof(w),1,D); /* test word */ |