Commit b3ee0f81 authored by John van Groningen's avatar John van Groningen
Browse files

undo changes in last revision, read 8 bytes to read descriptors on 64 bit windows, instead of 4,

(iwrite_heap.c was not yet committed)
parent a9dc05d2
...@@ -113,13 +113,12 @@ read_heap_file file_name files ...@@ -113,13 +113,12 @@ read_heap_file file_name files
(_,data_begin,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file); (_,data_begin,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,small_integers,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file); (_,small_integers,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,characters,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file); (_,characters,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,int_descriptor,file) = freadi file; (_,int_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,char_descriptor,file) = freadi file; (_,char_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,real_descriptor,file) = freadi file; (_,real_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,bool_descriptor,file) = freadi file; (_,bool_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,string_descriptor,file) = freadi file; (_,string_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,array_descriptor,file) = freadi file; (_,array_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
# (error,file) = ferror file; # (error,file) = ferror file;
| error | error
= abort "error reading heap file"; = abort "error reading heap file";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment