Subversion Repositories Kolibri OS

Rev

Rev 298 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 298 Rev 333
Line 337... Line 337...
337
( int		lowtag,
337
( int           lowtag,
338
  int		hightag )
338
  int           hightag )
339
{
339
{
340
    memblock_t*	block;
340
    memblock_t* block;
Line 341... Line 341...
341
	
341
        
342
    printf ("zone size: %i  location: %p\n",
342
    //printf ("zone size: %i  location: %p\n",
Line 343... Line 343...
343
	    mainzone->size,mainzone);
343
//          mainzone->size,mainzone);
344
    
344
    
Line 345... Line 345...
345
    printf ("tag range: %i to %i\n",
345
    //printf ("tag range: %i to %i\n",
346
	    lowtag, hightag);
346
//          lowtag, hightag);
347
	
347
        
348
    for (block = mainzone->blocklist.next ; ; block = block->next)
348
    for (block = mainzone->blocklist.next ; ; block = block->next)
Line 374... Line 374...
374
//
374
//
375
void Z_FileDumpHeap (FILE* f)
375
void Z_FileDumpHeap (FILE* f)
376
{
376
{
377
    memblock_t*	block;
377
    memblock_t* block;
Line 378... Line 378...
378
	
378
        
Line 379... Line 379...
379
    fprintf (f,"zone size: %i  location: %p\n",mainzone->size,mainzone);
379
    //printf ("zone size: %i  location: %p\n",mainzone->size,mainzone);
380
	
380
        
381
    for (block = mainzone->blocklist.next ; ; block = block->next)
381
    for (block = mainzone->blocklist.next ; ; block = block->next)
382
    {
382
    {
Line 383... Line 383...
383
	fprintf (f,"block:%p    size:%7i    user:%p    tag:%3i\n",
383
        printf ("block:%p    size:%7i    user:%p    tag:%3i\n",
384
		 block, block->size, block->user, block->tag);
384
                 block, block->size, block->user, block->tag);
385
		
385
                
386
	if (block->next == &mainzone->blocklist)
386
        if (block->next == &mainzone->blocklist)
387
	{
387
        {
Line 388... Line 388...
388
	    // all blocks have been hit
388
            // all blocks have been hit
389
	    break;
389
            break;
Line 390... Line 390...
390
	}
390
        }
391
	
391
        
Line 392... Line 392...
392
	if ( (byte *)block + block->size != (byte *)block->next)
392
        if ( (byte *)block + block->size != (byte *)block->next)
393
	    fprintf (f,"ERROR: block size does not touch the next block\n");
393
            printf ("ERROR: block size does not touch the next block\n");
394
 
394
 
395
	if ( block->next->prev != block)
395
        if ( block->next->prev != block)