[list] typo in list lib

2016-05-18 17:22:22 -04:00 · 2016-05-18 17:22:22 -04:00 · 4ab5ce5c95
commit 4ab5ce5c95
parent 50c98645ca
1 changed files with 1 additions and 1 deletions
--- a/trivial/private/list.rkt
+++ b/trivial/private/list.rkt
@ -96,7 +96,7 @@
     [(~or (null)
           (#%plain-app null))
      0]
-     [+ #f]))
+     [_ #f]))

  (define-values (lst-length-key lst? lst-define lst-let)
    (make-value-property 'list:length parse-list-length))