Skip to content
GitLab
Commit a9dc05d2 authored by John van Groningen's avatar John van Groningen
Browse files

read 4 bytes to read descriptors on 64 bit windows, instead of 8

parent 41545bee
Hide whitespace changes
Inline Side-by-side
HeapProfile/ShowHeapProfile.icl
View file @ a9dc05d2
......@@ -113,12 +113,12 @@ read_heap_file file_name files
(_,data_begin,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);
(_,int_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,char_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,real_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,bool_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,string_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,array_descriptor,file) = IF_INT_64_OR_32 (freadi8 file) (freadi file);
(_,int_descriptor,file) = freadi file;
(_,char_descriptor,file) = freadi file;
(_,real_descriptor,file) = freadi file;
(_,bool_descriptor,file) = freadi file;
(_,string_descriptor,file) = freadi file;
(_,array_descriptor,file) = freadi file;
# (error,file) = ferror file;
| error
......
Supports Markdown
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