Removed re-spans as it seems too specific for this library.

jimpil · Sep 29, 2012 · 7be9da4 · 7be9da4
1 parent be529a4
commit 7be9da4
Showing 1 changed file with 0 additions and 9 deletions.
diff --git a/src/opennlp/span.clj b/src/opennlp/span.clj
@@ -70,12 +70,3 @@ with the type of the first."
   [a b]
   {:pre [(< (:end a) (:start b))]}
   (make-span (:end a) (:start b) :between))
-
-(defn re-spans
-  "Find text spans for all regular expression matches."
-  [re s]
-  (loop [m (re-matcher re s)
-         r []]
-    (if (.find m)
-      (recur m (conj r (make-span (.start m) (.end m) nil)))
-      r)))