anchor.diff:                                    end
                             end, Hosts),
               ok;
  -		fail -> fail
  +        fail -> fail
       end.
   
   -spec scalaris_vm(start | stop, string()) -> ok.
  
positive.code: -author('michels@zib.de').
  -vsn('$Id$').
  
  -include("scalaris.hrl").
  
  -behavior(cloud_beh).
  
negative.code: 
  -spec add_or_remove_vms(add | remove, integer()) ->  fail | ok.
  add_or_remove_vms(Flag, Pending) ->
      case get_hosts() of
      	{TLog, Hosts} ->
              UpdatedHosts = add_or_remove_vms(Flag, Pending, Hosts, []),
              save_hosts(TLog, UpdatedHosts);
          fail -> fail
      end.
  
  -spec add_or_remove_vms(add | remove, integer(), hostlist(), hostlist()) -> hostlist().
  add_or_remove_vms(_Flag, _Pending = 0, Hosts, UpdatedHosts) ->
  