% % process commands and outgoing messages % "timer" &_Arching.ServLock &"_*" conntext timing { % % the next timer in sequence has elapsed % % stack: filename % % retain this step by emptying top stack item to % prevent deletion of timer, possibly blocks other timers % if timer action empties the timer filespec on stack % "finta" log)( dup conn* any? { ofconn "fintb" log)( del } if } if