X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-concurrency%2Fpackage.lisp;h=7e6c6bd421c822769777e7a9b0cee8c568d7866f;hb=18a1f7605aa95cb84282900298c369514e9d49c2;hp=a9124b647f0651e6b82dcf06d9114039720ef49a;hpb=ea0735f0b8bab352d6c9797abec19e8c63563cf6;p=sbcl.git

diff --git a/contrib/sb-concurrency/package.lisp b/contrib/sb-concurrency/package.lisp
index a9124b6..7e6c6bd 100644
--- a/contrib/sb-concurrency/package.lisp
+++ b/contrib/sb-concurrency/package.lisp
@@ -1,5 +1,5 @@
 (defpackage :sb-concurrency
-  (:use :cl :sb-thread)
+  (:use :cl :sb-thread :sb-int)
   (:export
    ;; MAILBOX
    "LIST-MAILBOX-MESSAGES"
@@ -24,4 +24,14 @@
    "QUEUE-EMPTY-P"
    "QUEUE-NAME"
    "QUEUEP"
+
+   ;; GATE
+   "CLOSE-GATE"
+   "GATE"
+   "GATE-NAME"
+   "GATE-OPEN-P"
+   "GATEP"
+   "MAKE-GATE"
+   "OPEN-GATE"
+   "WAIT-ON-GATE"
    ))
\ No newline at end of file