creat :: TimeoutManager -> TimeoutInUs -> Finalizer -> IO ()
creat _ timeout fin = do
  tm <- getSystemTimerManager
  void $ registerTimeout tm timeout fin
creat :: TimeoutManager -> TimeoutInUs -> Finalizer -> IO ()
creat _ timeout fin = do
  tm <- getSystemTimerManager
  void $ registerTimeout tm timeout fin
creat _ timeout fin = do
  tm <- getSystemTimerManager
  void $ registerTimeout tm timeout fin