anchor.diff:                         end)),
      
      check(waitall([{n000,stopped},{n001,stopped}]),
  -         [ { ?READ,n001 }
  +         [ { ?READX,n001 }
            ]).
   
   write_go_test() ->
  
positive.code:          [ { ?READ,n001 }
           ]).
  
  
  read_step_test() ->
     M = setup("-- READ TEST/STEP"),
     util:unregister(n000),
  
negative.code: -define(FETCHP,    [reset,{fetchp,{t,16#1d5}}]).
  -define(FETCHB,    [reset,{fetchp,{t,16#1d5}},{bstore,{b,16#1d5}},{fetchb,{t,678}}]).
  -define(STOREB,    [reset,{fetchp,{t,16#1d5}},{bstore,{b,16#1d5}},{fetchp,{t,678}},nop,{storeb,{b,16#1d5},{t,678}}]).
  -define(READ,      [reset,{fetchp,{t,16#1d5}},{bstore,{b,16#1d5}},{fetchb,{t,678}},nop]).
  
  -define(READX,     [reset,read,{read,678},eof]).
  -define(WRITE,     [reset,{write,678},{write,ok},eof]).
  -define(READ_STOP, [reset,nop,read,stop]).
  -define(WRITE_STOP,[reset,nop,{write,123},stop]).
  