anchor.diff:  	eot ->
   	    Q;
   	{Tag,Str} ->
  -	    do_output(Tag, Str, undefined, St),
  +	    _ = do_output(Tag, Str, undefined, St),
   	    do_print_buffered(Q, St)
       end.
   
  
positive.code: 	   true ->
  		%% Fd ready, print anything buffered for associated Tag
  		lists:filtermap(fun({T,From,Str}) when T == Tag ->
  					output(From, Tag, Str, St1),
  					false;
  				   (_) ->
  					true
  
negative.code:     InUse = ordsets:from_list(InUse0),
      Gls = gb_sets:to_list(Gls0),
      NotUsed = ordsets:subtract(Gls, InUse),
      _ = [test_server_gl:stop(Pid) || Pid <- NotUsed],
      ok.
  