about summary refs log tree commit diff
path: root/src/pronouns/util.clj
diff options
context:
space:
mode:
authorMorgan Astra <m@morganastra.me>2016-08-07 03:04:39 -0700
committerMorgan Astra <m@morganastra.me>2016-08-07 03:04:39 -0700
commitf0f6c207daea6efff6422e0a79fa388198fc9d4d (patch)
tree0026ea96f5d05c9402a53949fb6b8f831bb43917 /src/pronouns/util.clj
parentc3687318b1e435981c4190a941173ee7ed346d8c (diff)
add experimental support for multiple pronoun sets
Diffstat (limited to 'src/pronouns/util.clj')
-rw-r--r--src/pronouns/util.clj3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/pronouns/util.clj b/src/pronouns/util.clj
index 4d4f928..3a4bf10 100644
--- a/src/pronouns/util.clj
+++ b/src/pronouns/util.clj
@@ -29,3 +29,6 @@
   "given a list of pronoun rows, return a list of minimum unabiguous paths"
   [pronouns-table]
   (map (partial minimum-unambiguous-path pronouns-table) pronouns-table))
+
+(defn vec-coerce [x]
+  (if (vector? x) x [x]))