| parent
 ssx 'R child'
 wait 'childevent'
 'child is running...' []
 'child will end...' []
 post 'dieevent'
 delay 5000