From d9cbd866d906296a02bd7065fd693483926f84c7 Mon Sep 17 00:00:00 2001 From: Quincey Koziol Date: Sat, 21 Jul 2007 00:59:03 -0500 Subject: [svn-r13993] Description: Correct error for checking whether an object in a file can be extended when there are no free lists maintained by the VFD. Tested on: FreeBSD/32 6.2 (duty) w/check-vfd --- src/H5FD.c | 26 ++++++++++++++------------ 1 file changed, 14 insertions(+), 12 deletions(-) diff --git a/src/H5FD.c b/src/H5FD.c index 550773a..9dc3626 100644 --- a/src/H5FD.c +++ b/src/H5FD.c @@ -2736,19 +2736,21 @@ H5FD_can_extend(const H5FD_t *file, H5FD_mem_t type, haddr_t addr, hsize_t size, } /* end else */ /* Scan through the existing blocks for the mapped type to see if we can extend one */ - curr = file->fl[mapped_type]; - end = addr + size; - while(curr != NULL) { - if(end == curr->addr) { - if(extra_requested <= curr->size) - HGOTO_DONE(TRUE) - else - HGOTO_DONE(FALSE) - } /* end if */ + if(mapped_type >= H5FD_MEM_DEFAULT) { + curr = file->fl[mapped_type]; + end = addr + size; + while(curr != NULL) { + if(end == curr->addr) { + if(extra_requested <= curr->size) + HGOTO_DONE(TRUE) + else + HGOTO_DONE(FALSE) + } /* end if */ - /* Advance to next node in list */ - curr=curr->next; - } /* end while */ + /* Advance to next node in list */ + curr=curr->next; + } /* end while */ + } /* end if */ } /* end else */ done: -- cgit v0.12