anchor.diff:  handle_side_effects([_H | T]) ->
       handle_side_effects(T).
   
  +
   %%%===================================================================
   %%% Unit tests
   %%%===================================================================
  +
   -ifdef(TEST).
   -compile(export_all).
   -include_lib("eunit/include/eunit.hrl").
  
positive.code: simple_queue_2_test() ->
      Tests = [
               {run,   {init, {?MAX_Q_LEN, [fsm1, fsm2]}}},
               {msg,   {put_on_queue, a_query}},
               {msg,   {put_on_queue, a_query}},
               {msg,   {put_on_queue, a_query}},
               {msg,   {put_on_queue, a_query}},
               {clear, replies},
               {clear, side_effects},
               {msg,   get_active_qrys},
               {reply, {active_qrys, [
                                      {node(), 1},
                                      {node(), 2}
                                     ]}},
               {msg,   get_queued_qrys},
               {reply, {queued_qrys, [
                                      {node(), 3},
                                      {node(), 4}
                                     ]}}
              ],
      {SideEffects, Replies, Errors} = runner_TEST(Tests),
      ?assertEqual({[], [], []}, {SideEffects, Replies, Errors}).
  
negative.code: simple_overload_test() ->
      Tests = [
               {run,   {init, {?SHORT_Q, [fsm1, fsm2]}}},
               {msg,   {put_on_queue, a_query, a_ddl}},
               {msg,   {put_on_queue, a_query, a_ddl}},
               {msg,   {put_on_queue, a_query, a_ddl}},
               {clear, replies},
               {clear, side_effects},
               {msg,   {put_on_queue,  a_query, a_ddl}},
               {reply, {error, {overloaded, {max_queue_length, ?SHORT_Q}}}}
              ],
      {SideEffects, Replies, Errors} = runner_TEST(Tests),
      ?assertEqual({[], [], []}, {SideEffects, Replies, Errors}).
  