^/ ProcessMessage ->
Arg Thread_context : ^&LocalVariables,
    Message : ReceivedMessage,
    F_name, Caller_name : String

Log +1 'Entering ' F_name ''                          
       '.[' Caller_name '], ' ''     
       'id: ' Message.id                       

- ProcessMessage *

Log -1 'Leaving ' F_name ''
       '.[' Caller_name ']' ''
       'id: ' Message.id

/                                                     
