anchor.diff:  
   -behavior(cloud_beh).
   
  --include("../include/scalaris.hrl").
  +-include("scalaris.hrl").
   
  --export([init/0, get_number_of_vms/0, add_vms/1, remove_vms/1, find_free_port/0, find_free_port/1]).
  +-export([init/0, get_number_of_vms/0, add_vms/1, remove_vms/1]).
  +
  +
  +%%%%%%%%%%%%%%%%%%%%%
  +%%%% Behavior methods
  +%%%%%%%%%%%%%%%%%%%%%
   
   -spec init() -> ok.
   init() ->
  -	case config:read("as_min_vms") andalso config:read("as_max_vms") of
  +	case config:read(cloud_local_min_vms) of
   		failed ->
  -			config:write("as_min_vms", 1),
  -			config:write("as_max_vms", ?PLUS_INFINITY);
  +			config:write(cloud_local_min_vms, 1),
  +			config:write(cloud_local_max_vms, ?PLUS_INFINITY);
   		X -> X
  -	end.
  +	end,
  +	ok.
  +
   
   -spec get_number_of_vms() -> integer().
   get_number_of_vms() ->
  
positive.code: 				Cmd = lists:flatten(io_lib:format("./../bin/scalarisctl -e -detached -s -p ~p -y ~p -n ~s start", 
  									[Port, YawsPort, NodeName])),
  				io:format("Executing: ~p~n", [Cmd]),
  				os:cmd(Cmd),
  				wait_for(fun get_number_of_vms/0, get_number_of_vms() + 1),
  				timer:sleep(200)
  		end,
  	[SpawnFun(X) || X <- lists:seq(1, N), get_number_of_vms() < config:read("as_max_vms")],		   
  	ok.
  
  wait_for(Fun, ExpectedValue) ->
  	case Fun() of
  		ExpectedValue -> ok;
  
negative.code: 			wait_for(Fun, ExpectedValue)
  	end.
  
  -spec find_free_port(integer()) -> integer().
  find_free_port(Port) ->
  	case gen_tcp:listen(Port, []) of
  		{ok, Socket} -> gen_tcp:close(Socket), 
  