anchor.diff:  
       ?line Purge = start_purge(my_code_test2, PurgeType),
   
  -    ?line {P0, M0} = spawn_monitor(fun () ->
  +    ?line {P1, M1} = spawn_monitor(fun () ->
                                              ?line [{my_fun,F}] = ets:lookup(T, my_fun),
                                              ?line 4712 = F(1),
                                              exit(completed)
   			     end),
   
  -    ?line ok = wait_until(fun () ->
  +   ?line ok =  wait_until(fun () ->
                                     {status, suspended}
  -                                      == process_info(P0, status)
  +                                      == process_info(P1, status)
                             end),
   
       ?line ok = continue_purge(Purge),
   
  -    ?line {P1, M1} = spawn_monitor(fun () ->
  +    ?line {P2, M2} = spawn_monitor(fun () ->
                                              ?line [{my_fun,F}] = ets:lookup(T, my_fun),
                                              ?line 4713 = F(2),
                                              exit(completed)
   			     end),
  -    ?line {P2, M2} = spawn_monitor(fun () ->
  +    ?line {P3, M3} = spawn_monitor(fun () ->
                                              ?line [{my_fun,F}] = ets:lookup(T, my_fun),
                                              ?line 4714 = F(3),
                                              exit(completed)
  
positive.code: 
      ?line ok = wait_until(fun () ->
                                    {status, suspended}
                                        == process_info(P1, status)
                            end),
      ?line ok = wait_until(fun () ->
                                    {status, suspended}
                                        == process_info(P2, status)
                            end),
  
      ?line {current_function,
       {erts_code_purger,
        pending_purge_lambda,
        3}} = process_info(P0, current_function),
      ?line {current_function,
       {erts_code_purger,
        pending_purge_lambda,
  
negative.code:      {erts_code_purger,
        pending_purge_lambda,
        3}} = process_info(P2, current_function),
      ?line {current_function,
       {erts_code_purger,
        pending_purge_lambda,
        3}} = process_info(P3, current_function),
  
      case Type of
  	code_there ->
  