anchor.diff:  
   %% Analyze selected function.
   analyze() ->
  -    register(?RP_GUI_ANALYSIS, self()),
       Module = getModule(),
       {Function, Arity} = getFunction(),
       ModuleList = ref_lookup(?MODULE_LIST),
  
positive.code: 
  %% Kill the analysis process.
  stop() ->
      case whereis(?RP_SCHED) of
          undefined -> ok;
          _Pid ->
              ?RP_SCHED ! stop_analysis,
              wxMenuItem:enable(ref_lookup(?STOP_MENU_ITEM), [{enable, false}]),
              AnalStopSizer = ref_lookup(?ANAL_STOP_SIZER),
              StopButton = ref_lookup(?STOP),
              Parent = wxWindow:getParent(StopButton),
              StopGauge = wxGauge:new(Parent, ?wxID_ANY, 100,
                                      [{style, ?wxGA_HORIZONTAL}]),
              ref_add(?STOP_GAUGE, StopGauge),
              wxSizer:replace(AnalStopSizer, StopButton, StopGauge),
              wxWindow:destroy(StopButton),
              wxSizer:layout(AnalStopSizer),
              start_pulsing(StopGauge),
              ?RP_GUI_ANALYSIS ! analysis_stopped
      end.
  
  %% XXX: hack (send event message to self)
  
negative.code: 		    end
  	    end;
         true -> continue            
      end.
  
  analyze_aux(Module, Function, Args, Files) ->
      analysis_init(),
  