anchor.diff:  	    notify_owners({read_only,B}),
   	    loop(S);
   	L when L#log.status =:= ok, L#log.format =:= internal ->
  -	    log_loop(S, [], [B], [], iolist_size(B));
  +	    log_loop(S, [], [B], []);
   	L when L#log.status =:= ok ->
   	    notify_owners({format_external, B}),
   	    loop(S);
  
positive.code: 	    notify_owners({read_only,B}),
  	    loop(S);
  	L when L#log.status =:= ok ->
  	    log_loop(S, [], [B], [], iolist_size(B));
  	L when L#log.status =:= {blocked, false} ->
  	    notify_owners({blocked_log, B}),
  	    loop(S);
  
negative.code: %%-define(PROFILE(C), C).
  -define(PROFILE(C), void).
  
  -compile({inline,[{log_loop,6},{log_end_sync,2},{replies,2},{rflat,1}]}).
  
  %%%----------------------------------------------------------------------
  %%% Contract type specifications
  