anchor.diff:  -ifdef(debug).
   -define(format(S, A), io:format(S, A)).
   -define(dbg(Data),io:format(standard_error, "DBG: ~p\r\n",[Data])).
  +-define(RM_RF(Dir),begin io:format(standard_error, "Not Removed: ~p\r\n",[Dir]), 
  +	ok end).
   -else.
   -define(format(S, A), ok).
   -define(dbg(Data),noop).
  +-define(RM_RF(Dir),rm_rf(Dir)).
   -endif.
   
   
  
positive.code: 		[MyNodeList, "io_proto_suite", N2List]),
      
      ?line GL = receive X when is_pid(X) -> X end,
      %% get_line
      ?line "Hej\n" = io:get_line(GL,"Prompt\n"),
      ?line io:setopts(GL,[binary]),
      ?line io:format(GL,"Okej~n",[]),
  
negative.code: 					      ?line ok
  				      end,
  				?line wait_for_runerl_server(SPid),
  				?line ok = ?RM_RF(Tempdir),
  				?line ok = Res
  			end
  	  end.
  