anchor.diff:  	    false ->
   		"no name"
   	end,
  -    
  +
       ChildPid =
   	case lists:keysearch(pid, 1, ChildInfo) of
   	    {value, {pid, ChildPid1}} ->
  
positive.code: 	 {started, ChildInfo}
  	] ->
  	    Descr = describe_started_child(ChildInfo),
  	    NewStack = 
  		case State#state.stack of
  		    [A, B, C, D | _] ->
  			[Descr, A, B, C, D];
  
negative.code: %%--------------------------------------------------------------------
  -export([init/1,
  	 handle_event/2,
  	 handle_call/2,
  	 handle_info/2,
  	 terminate/2,
  	 code_change/3
  