446 |
#define READ_STRING(leng,loc) do {BEGIN_NO_INTERRUPT; \ |
#define READ_STRING(leng,loc) do {BEGIN_NO_INTERRUPT; \ |
447 |
*loc = alloc_simple_string(leng); \ |
*loc = alloc_simple_string(leng); \ |
448 |
(*loc)->st.st_self=alloc_relblock(leng); END_NO_INTERRUPT; \ |
(*loc)->st.st_self=alloc_relblock(leng); END_NO_INTERRUPT; \ |
449 |
|
memset((*loc)->st.st_self,0,leng); /* fread won't restart if it triggers an SGC segfault -- CM */ \ |
450 |
D_FREAD((*loc)->st.st_self,1,leng,fas_stream);} while(0) |
D_FREAD((*loc)->st.st_self,1,leng,fas_stream);} while(0) |
451 |
|
|
452 |
/* if try_hash finds it we don't need to write the object |
/* if try_hash finds it we don't need to write the object |