gerritjvv

(use 'clojure.core.async)

(defn offer [ch msg timeout-ms]
    "Blocks till the message can be placed on the queue and returns true otherwise returns false"
    (not 
       (nil? 
         (first (alts!! [(go (>! ch msg) msg) (timeout timeout-ms)])))))


;;lets test