anchor.diff:  	{{unix,sunos},OsVersion} when OsVersion < {5,5,1} ->
   	    {skip,"Only supported on Win32, Unix or SunOS >= 5.5.1"};
   	{{unix,_},_} ->
  -	    N = unix_free(?config(priv_dir, Config)),
  +	    N = disc_free(?config(priv_dir, Config)),
   	    io:format("Free disk: ~w KByte~n", [N]),
   	    if N < 5 * (1 bsl 20) ->
   		    %% Less than 5 GByte free
  
positive.code: 
  
  %% System probe functions that might be handy to check from the shell
  -export([unix_free/1, memsize/0, bsd_memsize/1]).
  
  -include_lib("test_server/include/test_server.hrl").
  -include_lib("kernel/include/file.hrl").
  
negative.code: 
  
  init_per_suite(Config) when is_list(Config) ->
      SaslConfig = case application:start(sasl) of
  		     {error, {already_started, sasl}} ->
  			 [];
  		     ok ->
  			 [{sasl,started}]
  		 end,
      ok = application:start(os_mon),
      case os:type() of
  	{win32, _} ->
  	    Priv = ?config(priv_dir, Config),
  