anchor.diff:      timer:sleep(100),
       receive
           _Msg ->
  -            Count = case erlang:get(count) of
  -                        undefined -> 0;
  -                        Val -> Val
  -                    end,
  -            put(count, Count+1),
  +            update_msg_counter(),
               fake_loop_slow()
       end.
   
  
positive.code:             Pid ! {count, erlang:get(count)},
              fake_loop();
          _Msg ->
              Count = case erlang:get(count) of
                          undefined -> 0;
                          Val -> Val
                      end,
              put(count, Count+1),
              fake_loop()
      end.
  
  
negative.code: 
  -ifdef(TEST).
  
  update_msg_counter() ->
      Count = case erlang:get(count) of
          undefined -> 0;
          Val -> Val
      end,
      put(count, Count+1).
  
  fake_loop() ->
      receive
          block ->
  