%% gen.erl:177
do_call(Process, Label, Request, Timeout) ->
    %% We trust the arguments to be correct, i.e
    %% Process is either a local or remote pid,
    %% or a {Name, Node} tuple (of atoms) and in this 
    %% case this node (node()) _is_ distributed and Node /= node().
    Node = case Process of
	       {S, N} ->
		   N;
	       _ when pid(Process) ->
		   node(Process);
	       _ ->
		   self()  %% should be node()
	   end,
    ...

%% gen.erl:224
wait_resp_mon(Process, Mref, Timeout) ->
    Node = case Process of
	       {S, N} ->
		   N;
	       _ when pid(Process) ->
		   node(Process);
	       _ ->
		   self()  %% should be node()
	   end,
    ...