fix: dirty fix for coverage script

2 files changed, 3 insertions, 3 deletions

diff --git a/core.fnl b/core.fnl
index acca17c..76eb32f 100644
--- a/core.fnl
+++ b/core.fnl
@@ -301,14 +301,14 @@ ignored. Returns a table of results."
          (insert res tmp)))
      res)))
 
-(fn& core.filter [pred tbl]
+(fn* core.filter [pred tbl]
   (when-let [tbl (seq tbl)]
     (let [f (first tbl) r (rest tbl)]
       (if (pred f)
           (cons f (filter pred r))
           (filter pred r)))))
 
-(fn& core.-kvseq [tbl]
+(fn -kvseq [tbl]
   "Transforms any table kind to key-value sequence."
   (let [res []]
     (each [k v (pairs tbl)]
diff --git a/coverage.sh b/coverage.sh
index c66d2af..6849997 100755
--- a/coverage.sh
+++ b/coverage.sh
@@ -1,6 +1,6 @@
 #!/bin/env sh
 
-fns=$(grep "^(fn" core.fnl macros/core.fnl | cut -f2 --delimiter=" " | grep -v "^-")
+fns=$(grep "^(fn[&*] core." core.fnl macros/core.fnl | cut -f2 --delimiter=" " | cut -f2 --delimiter=".")
 tsts=$(
     for fn in $fns; do
         fn=$(echo "$fn" | sed "s/\?/\\\?/")