anchor.diff:      ?assertMatch({ok, _}, End1),
       lager:info("Tx2 Committed."),
       lager:info("Test read_wait passed"),
  -    ok.
  +    pass.
   
   spawn_read(LastNode, TxId, Return) ->
       ReadResult=rpc:call(LastNode, floppy, clocksi_iread,
                           [TxId, read_wait_test, riak_dt_pncounter]),
       Return ! {self(), ReadResult}.
   
  -%% The following function tests the certification check algorithm.
  -%% when two concurrent txs modify a single object, one hast to abort.
  +%% @doc The following function tests the certification check algorithm,
  +%%      when two concurrent txs modify a single object, one hast to abort.
   clocksi_test_certification_check(Nodes) ->
       lager:info("clockSI_test_certification_check started"),
       FirstNode = hd(Nodes),
  
positive.code:                       [now(), [{update, Key, Type, {increment,a}}]]),
      {ok,Result2} = rpc:call(Node, floppy, read,
                         [Key, Type]),
      ?assertEqual(Result1+1,Result2).
  
  get_random_key() ->
      random:seed(now()),
  
negative.code:     ?assertMatch({ok, _}, End1),
      lager:info("Tx2 Committed."),
      lager:info("Test read_time passed"),
      pass.
  
  %% @doc The following function tests that ClockSI does not read values
  %%      inserted by a tx with higher commit timestamp than the snapshot time
  %%      of the reading tx.
  clocksi_test_read_wait(Nodes) ->
      lager:info("Test read_wait started"),
      %% Start a new tx, update a key read_wait_test, and send prepare.
  