anchor.diff:  	 mote_read/2,
   	 mote_read_s/2,
   	 msg_wait/2,
  +	 get_last_event/2,
   	 %% nifty interface
   	 alloc/3,
   	 alloc/4,
  
positive.code: 	    ok
      end.
  
  alloc(Handler, Mote, Size) ->
      alloc(Handler, Mote, Size, 1000).
  
  
negative.code: 	 %% higher level
  	 wait_for_result/2,
  	 wait_for_result/3,
  	 wait_for_msg/4,
  	 next_event/2
  	]).
  
  start_node() ->
  