Unmark

Functions
static int	_tm_block_sweep_maybe (tm_block *b)
	Maybe sweep a tm_block.
static int	_tm_block_sweep_some ()
	Sweep some blocks.
static size_t	_tm_node_unmark_some (long left)
	Unmark some tm_BLACK nodes.
static void	_tm_node_unmark_all ()
	Unmark all tm_BLACK nodes.

---

Function Documentation

static int _tm_block_sweep_maybe

(

tm_block *

b

)

[static]

Maybe sweep a tm_block.

NOT USED!

Definition at line 1576 of file tm.c.

{
  return 0;
}

static int _tm_block_sweep_some

(

)

[static]

Sweep some blocks.

NOT IMPLEMENTED!

Definition at line 1586 of file tm.c.

References tm_block_sweep_some_size, and tm_msg().

Referenced by _tm_gc_full_type_inner().

{
  int count = 0;
  unsigned long bytes = 0;
  int left = tm_block_sweep_some_size;

#if tm_USE_SBRK
  /*
  ** Try to sweep last block allocated from OS first
  ** because we might be able to return it to the OS.
  */
#endif

  /*! NOT IMPLEMENTED! */

#if 0
  if ( count ) 
    tm_msg("b s b%lu b%lu\n", (unsigned long) count, (unsigned long) bytes);
#endif

  return count;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void _tm_node_unmark_all

(

)

[static]

Unmark all tm_BLACK nodes.

Definition at line 1646 of file tm.c.

References _tm_node_unmark_some(), tm_data::n, tm, tm_BLACK, tm_node_LOOP_INIT, and tm_TOTAL.

Referenced by _tm_gc_full_type_inner().

{
  while ( tm.n[tm_BLACK] ) {
    tm_node_LOOP_INIT(tm_BLACK);
    _tm_node_unmark_some(tm.n[tm_TOTAL]);
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static size_t _tm_node_unmark_some

(

long

left

)

[static]

Unmark some tm_BLACK nodes.

Definition at line 1614 of file tm.c.

References tm_data::n, tm, tm_assert_test, tm_BLACK, tm_ECRU, tm_msg(), tm_node_color, tm_node_LOOP, tm_node_LOOP_BREAK, tm_node_LOOP_END, tm_node_set_color(), and tm_node_to_block().

Referenced by _tm_alloc_type_inner(), and _tm_node_unmark_all().

{
  size_t count = 0, bytes = 0;

  tm_node_LOOP(tm_BLACK);
  {
    tm_assert_test(tm_node_color(n) == tm_BLACK);
    
    tm_node_set_color(n, tm_node_to_block(n), tm_ECRU);
    
    bytes += t->size;
    ++ count;
    
    if ( -- left <= 0 ) {
      tm_node_LOOP_BREAK(tm_BLACK);
    }
  }
  tm_node_LOOP_END(tm_BLACK);

#if 0
  if ( count ) 
    tm_msg("u n%lu b%lu l%lu\n", count, bytes, tm.n[tm_BLACK]);
#endif

  return tm.n[tm_BLACK];
}

Here is the call graph for this function:

Here is the caller graph for this function: