anchor.diff:  %% (through start/5) or if the -program switch to beam is used and
   %% includes arguments (typically done by cerl in OTP test environment
   %% in order to ensure that slave/peer nodes are started with the same
  -%% emulator and flags as the test node. The return from lib:progname()
  +%% emulator and flags as the test node. The result from progname()
   %% could then typically be '/<full_path_to>/cerl -gcov').
   quote_progname(Progname) ->
       do_quote_progname(string:lexemes(to_list(Progname)," ")).
  
positive.code: 			     " -s slave slave_start ", node(),
  			     " ", Waiter,
  			     " ", Args]),
  	   
      case after_char($@, atom_to_list(node())) of
  	Host ->
  	    {ok, BasicCmd};
  
negative.code:     start(Host, Name, Args, self()).
  
  start(Host0, Name, Args, LinkTo) ->
      Prog = progname(),
      start(Host0, Name, Args, LinkTo, Prog).
  
  start(Host0, Name, Args, LinkTo, Prog) ->
  