Mercurial > hg > xemacs-beta

comparison src/gmalloc.c @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents e9a3f8b4de53
children 943eaba38521
comparison
equal deleted inserted replaced
646:00c54252fe4f 647:b39c14581166
867 867
868 /* Get the address of the first free fragment in this block. */ 868 /* Get the address of the first free fragment in this block. */
869 prev = (struct list *) ((char *) ADDRESS (block) + 869 prev = (struct list *) ((char *) ADDRESS (block) +
870 (_heapinfo[block].busy.info.frag.first << type)); 870 (_heapinfo[block].busy.info.frag.first << type));
871 871
872 if (_heapinfo[block].busy.info.frag.nfree == (BLOCKSIZE >> type) - 1) 872 if (_heapinfo[block].busy.info.frag.nfree ==
873 (__malloc_size_t) ((BLOCKSIZE >> type) - 1))
873 { 874 {
874 /* If all fragments of this block are free, remove them 875 /* If all fragments of this block are free, remove them
875 from the fragment list and free the whole block. */ 876 from the fragment list and free the whole block. */
876 next = prev; 877 next = prev;
877 for (i = 1; i < (__malloc_size_t) (BLOCKSIZE >> type); ++i) 878 for (i = 1; i < (__malloc_size_t) (BLOCKSIZE >> type); ++i)