anchor.diff:                                            FakeEpoch, <<"prefix">>, Data,
                                             infinity),
               P_a = #p_srvr{name=a, address="localhost", port=6622},
  -            P1   = machi_projection:new(1, a, [P_a], [], [a], [], []),
  +            P1   = machi_projection:new(1, RegName, [P_a], [], [RegName], [], []),
               P1xx = P1#projection_v1{dbg2=["dbg2 changes are ok"]},
               P1yy = P1#projection_v1{dbg=["not exactly the same as P1!!!"]},
               EpochID = {P1#projection_v1.epoch_number,
  
positive.code:                     (stop) -> ?MUT:write_chunk(Prox1, FakeEpoch, File1, Off1,
                                                 Data, infinity)
                   end,
                   %% NOTE: When write-once enforcement is enabled, this test
                   %% will fail: change ok -> {error, written}
                   fun(run) -> %% {error, written} =
                               ok =
                                   ?MUT:write_chunk(Prox1, FakeEpoch, File1, Off1,
                                                    Dataxx, infinity),
                               ok;
  
negative.code:                     (stop) -> ?MUT:write_projection(Prox1, private, P1yy)
                   end,
  
                   fun(run) -> {ok, [#projection_v1{epoch_number=0}, #projection_v1{epoch_number=1}]} =
                                   ?MUT:get_all_projections(Prox1, public),
                               ok;
                      (line) -> io:format("line ~p, ", [?LINE]);
                      (stop) -> ?MUT:get_all_projections(Prox1, public)
                   end,
                   fun(run) -> {ok, [#projection_v1{epoch_number=0}, #projection_v1{epoch_number=1}]} =
                                   ?MUT:get_all_projections(Prox1, private),
                               ok;
                      (line) -> io:format("line ~p, ", [?LINE]);
  