       :handler #<accessrules$compile_rule_handler$fn__14040$fn__14043...>
   "
   [accessrule]
+  {:pre [(map? accessrule)]}
   (let [handler (compile-rule-handler (:handler accessrule))
         matcher (cond
                  (:pattern accessrule)

  ([] (RuleError. nil))
  ([v] (RuleError. v)))

(extend-protocol IRuleHandlerResponse
  nil
  (success? [_] false)

  (toString [self]
    (with-out-str (print [v]))))

(defn success
  "Function that return a success state
  from one access rule handler."
