diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-19 23:07:45 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-19 23:21:57 +0200 |
commit | fa2e5c5a2aa65bfdedd58c9ca1b6f790e59c05df (patch) | |
tree | 19c622b042848ce33a5487f21b8219212e9acbdc /module/util.scm | |
parent | Add warning with failed unlinking of unix socket. (diff) | |
download | calp-fa2e5c5a2aa65bfdedd58c9ca1b6f790e59c05df.tar.gz calp-fa2e5c5a2aa65bfdedd58c9ca1b6f790e59c05df.tar.xz |
Add test for filter-sorted.
Diffstat (limited to 'module/util.scm')
-rw-r--r-- | module/util.scm | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/module/util.scm b/module/util.scm index 10e36d4e..617a2ea6 100644 --- a/module/util.scm +++ b/module/util.scm @@ -305,8 +305,6 @@ ;; seeds: (car items) '()))) -;; TODO This might be utterly broken, do some real tests on it -;; (and then run equivalent tests on the stream variant) (define-public (filter-sorted proc list) (take-while proc (drop-while |