diff --git a/src/grafter/matcha/alpha.clj b/src/grafter/matcha/alpha.clj index 5a80f55..7d1333d 100644 --- a/src/grafter/matcha/alpha.clj +++ b/src/grafter/matcha/alpha.clj @@ -178,7 +178,7 @@ (declare parse-patterns) (defn- parse-optional [{:keys [bgps]}] - `[(l/conde ~(parse-patterns bgps))]) + (parse-patterns bgps)) (defn- parse-clause [[type row]] (case type