anchor.diff:      ?line {done,{ok,[]},[]} = io_lib:fread(C2, "d\n", " d"),
       ok.
   
  +
  +printable_range(doc) ->
  +    "Check that the printable range set by the user actually works";
  +printable_range(Suite) when is_list(Suite) ->
  +    Pa = filename:dirname(code:which(?MODULE)),
  +    {ok, UNode} = test_server:start_node(printable_range_unicode, slave, 
  +					 [{args, " +pc unicode -pa " ++ Pa}]),
  +    {ok, LNode} = test_server:start_node(printable_range_latin1, slave, 
  +					 [{args, " +pc latin1 -pa " ++ Pa}]),
  +    {ok, DNode} = test_server:start_node(printable_range_default, slave, 
  +					 [{args, " -pa " ++ Pa}]),
  +    unicode = rpc:call(UNode,io,printable_range,[]),
  +    latin1 = rpc:call(LNode,io,printable_range,[]),
  +    latin1 = rpc:call(DNode,io,printable_range,[]),
  +    test_server:stop_node(UNode),
  +    test_server:stop_node(LNode),
  +    {ok, UNode} = test_server:start_node(printable_range_unicode, slave, 
  +					 [{args, " +pcunicode -pa " ++ Pa}]),
  +    {ok, LNode} = test_server:start_node(printable_range_latin1, slave, 
  +					 [{args, " +pclatin1 -pa " ++ Pa}]),
  +    unicode = rpc:call(UNode,io,printable_range,[]),
  +    latin1 = rpc:call(LNode,io,printable_range,[]),
  +    {error, _} = test_server:start_node(printable_range_unnicode, slave, 
  +					[{args, " +pcunnicode -pa " ++ Pa}]),
  +    PrettyOptions = [{column,1},
  +		     {line_length,109},
  +		     {depth,30},
  +		     {max_chars,60},
  +		     {record_print_fun,
  +		      fun(_,_) -> no end},
  +		     {encoding,unicode}],
  +    1025 = lists:max(lists:flatten(rpc:call(UNode,io_lib_pretty,print,
  +					    [{hello, [1024,1025]},
  +					     PrettyOptions]))),
  +    125 = lists:max(lists:flatten(rpc:call(LNode,io_lib_pretty,print,
  +					   [{hello, [1024,1025]},
  +					    PrettyOptions]))),
  +    125 = lists:max(lists:flatten(rpc:call(DNode,io_lib_pretty,print,
  +					   [{hello, [1024,1025]},
  +					    PrettyOptions]))),
  +    1025 = lists:max(lists:flatten(rpc:call(UNode,io_lib_pretty,print,
  +					    [{hello, <<1024/utf8,1025/utf8>>},
  +					     PrettyOptions]))),
  +    125 = lists:max(lists:flatten(rpc:call(LNode,io_lib_pretty,print,
  +					   [{hello, <<1024/utf8,1025/utf8>>},
  +					    PrettyOptions]))),
  +    125 = lists:max(lists:flatten(rpc:call(DNode,io_lib_pretty,print,
  +					   [{hello, <<1024/utf8,1025/utf8>>},
  +					    PrettyOptions]))),
  +    
  +    1025 = lists:max(lists:flatten(rpc:call(UNode,io_lib,format,
  +					    ["~tp",[{hello, [1024,1025]}]]))),
  +    125 = lists:max(lists:flatten(rpc:call(LNode,io_lib,format,
  +					   ["~tp",[{hello, [1024,1025]}]]))),
  +    125 = lists:max(lists:flatten(rpc:call(DNode,io_lib,format,
  +					   ["~tp",[{hello, [1024,1025]}]]))),
  +    1025 = lists:max(lists:flatten(rpc:call(UNode,io_lib,format,
  +					    ["~tp",
  +					     [{hello, 
  +					       <<1024/utf8,1025/utf8>>}]]))),
  +    125 = lists:max(lists:flatten(rpc:call(LNode,io_lib,format,
  +					   ["~tp",
  +					    [{hello, 
  +					      <<1024/utf8,1025/utf8>>}]]))),
  +    125 = lists:max(lists:flatten(rpc:call(DNode,io_lib,format,
  +					   ["~tp",
  +					    [{hello, 
  +					      <<1024/utf8,1025/utf8>>}]]))),
  +    test_server:stop_node(UNode),
  +    test_server:stop_node(LNode),
  +    test_server:stop_node(DNode),
  +    ok.
  +    
  +
   io_lib_print_binary_depth_one(doc) ->
       "Test binaries printed with a depth of one behave correctly";
   io_lib_print_binary_depth_one(Suite) when is_list(Suite) ->
  
positive.code:          manpage/1, otp_6708/1, otp_7084/1, otp_7421/1,
  	 io_lib_collect_line_3_wb/1, cr_whitespace_in_string/1,
  	 io_fread_newlines/1, otp_8989/1, io_lib_fread_literal/1,
  	 io_lib_print_binary_depth_one/1, otp_10302/1, otp_10755/1,
  	 otp_10836/1]).
  
  %-define(debug, true).
  
  
negative.code:      manpage, otp_6708, otp_7084, otp_7421,
       io_lib_collect_line_3_wb, cr_whitespace_in_string,
       io_fread_newlines, otp_8989, io_lib_fread_literal,
       printable_range,
       io_lib_print_binary_depth_one, otp_10302, otp_10755, otp_10836].
  
  groups() -> 
  