anchor.diff:      ok = gen_tcp:close(LS),
       ok.
   
  --define(OTP_3924_MAX_DELAY, 100).
  +-define(OTP_3924_MAX_DELAY,  100).
  +-define(OTP_3924_MIN_FACTOR, 4).
   %% Taken out of the blue, but on intra host connections
   %% I expect propagation of a close to be quite fast
   %% so 100 ms seems reasonable.
  
positive.code: 	    if
  		NewAccLen == Len ->
  		    {ok, TRef} = timer:exit_after(MaxDelay,
  							self(),
  							TimeoutRef),
  		    {error, closed} = gen_tcp:recv(Sock, 0),
  		    timer:cancel(TRef),
  		    lists:flatten([Acc, Data]);
  
negative.code:                    ?P("~w:post -> try stop node ~p", [?FUNCTION_NAME, Node]),
                     ?STOP_NODE(Node)
             end,
      ?TC_TRY(?FUNCTION_NAME, Cond, Pre, TC, Post).
  
  do_otp_3924(Config, Node, MaxDelay) ->
      DataLen = 100*1024,
  