 
 (defn resolved?
   "Returns true if promise `p` is
-  already successfuly resolved."
+  completed successfully."
   [p]
   (resolved* p))
 
 (defn pending?
   "Returns true if promise `p` is
-  stil pending."
+  stil in pending state."
   [p]
   (pending* p))
 

    (then promise' (fn [_]
                     (mapv deref promises)))))


(defn any
  "Given an array of promises, return a promise
  that is fulfilled when first one item in the


(defn done?
  "Returns true if promise `p` is
  done independently if successfully
  o exceptionally."
  [p]
  (done* p))

