anchor.diff:  %% If this is a patched version of major release X, then this test
   %% performs an upgrade from major release X to the current release.
   minor(Config) ->
  +    put(verbose, true),
  +    p("minor -> get current major release"),
       CurrentMajor = erlang:system_info(otp_release),
       Current = CurrentMajor++"_patched",
       upgrade_test(CurrentMajor,Current,Config).
   
   %%%-----------------------------------------------------------------
   upgrade_test(FromVsn,ToVsn,Config) ->
  +    p("upgrade_test -> entry with"
  +      "~n      FromVsn: ~p"
  +      "~n      ToVsn:   ~p"
  +      "~n      Config:  ~p", [FromVsn, ToVsn, Config]),
       OldRel =
   	case test_server:is_release_available(FromVsn) of
   	    true ->
  
positive.code: 			end
  		end
  	end,
      case OldRel of
  	false ->
  	    %% Note that priv_dir here is per test case!
  
negative.code: 	_ ->
  	    ok
      end. 
  
  
  %%%-----------------------------------------------------------------
  %%% 
  
  p(F) ->
      p(F, []).
  
  p(F, A) ->
      p(get(verbose), F, A).
  
  p(true, F, A) ->
      print(F, A);
  p(_, _, _) ->
      ok.
  
  print(F, A) ->
      ct:pal(F ++ "~n", A).
  
  