kmx.io/cl-thot

diff --git a/thot-epoll.lisp b/thot-epoll.lisp
index cbaeb62..96750a8 100644
--- a/thot-epoll.lisp
+++ b/thot-epoll.lisp
@@ -188,7 +188,8 @@
         ((eq *acceptor-loop* 'acceptor-loop-threaded)
          (setq *worker-thread-for-fd* 'acceptor-loop-epoll))))
 
-(trace socket:socket socket:bind socket:listen socket:accept
+(untrace socket:socket socket:bind socket:listen socket:accept
        unistd:close
+       epoll:create
        epoll-add epoll-del
        acceptor-loop-epoll make-worker agent-in agent-out)