anchor.diff:                      ok;
                   _ -> cs_send:send_local(Pid , Msg)
               end,
  -            loop(Module, State, _ComponentState);
  +            loop(Module, On, State, ComponentState);
           Message ->
               %Start = erlang:now(),
  -            case (try Module:on(Message, State) catch
  +            case (try Module:On(Message, State) catch
                                                       throw:Term -> {exception, Term};
                                                       exit:Reason -> {exception,Reason};
                                                       error:Reason -> {exception, {Reason,
  
positive.code: %%%------------------------------------------------------------------------------
  %%% File    : gen_component.erl
  %%% Author  : Thorsten Schuett <schuett@zib.de>
  %%% Description : 
  %%%
  %%% Created : 19 Dec 2008 by Thorsten Schuett <schuett@zib.de>
  %%%------------------------------------------------------------------------------
  %% @doc 
  %% @author Thorsten Schuett <schuett@zib.de>
  %% @copyright 2008, 2009 Konrad-Zuse-Zentrum für Informationstechnik Berlin
  %% @version $Id$
  
negative.code:         %io:format("ok is da~n"),
          ok
      end.
  
  handle_unknown_event(UnknownMessage, State, ComponentState,Module) ->
     log:log(error,"unknown message: ~p in Module: ~p ~n in State ~p ~n",[UnknownMessage,Module,State]),
  