[erlang-questions] Programming question

[Sean Hinde]

Hi,

A quick question for Erlang gurus out there.

I have two processes A and B. B spends most of its life in a series  
of gen_server calls towards A:

loopB(PidA, S) ->
      Res = gen_server:call(PidA, {op, stuff}),
      S1 = process(Res, S),
      loopB(PidA, S1).

The question is how do I set things up so that if A dies B is killed?

Thanks,
Sean