Skip to content
Browse files

Fix @heap-tests.el typos.

  • Loading branch information...
1 parent a379c8c commit ebd909f49e23f3b47d673f1d98a776d72dc9f9e1 @skeeto committed Apr 6, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/@heap-tests.el
View
4 lib/@heap-tests.el
@@ -9,7 +9,7 @@
(@! h :add '(c . 3))
(@! h :add '(a . 1))
(should (eq 'a (car (@! h :peek))))
- (should (equal '(a b c d) (map #'car (@! h :to-list))))
+ (should (equal '(a b c d) (mapcar #'car (@! h :to-list))))
(should
(equal '(a b c d)
- (loop until (@! h :emptyp) collect (car (@! h :next))))))))
+ (loop until (@! h :emptyp) collect (car (@! h :next)))))))

0 comments on commit ebd909f

Please sign in to comment.
Something went wrong with that request. Please try again.