Permalink
Browse files

.

  • Loading branch information...
1 parent c422ed1 commit e2e3d932ce31c1e9a66dfabeb41c920d3a6779d9 @akkartik akkartik committed Jul 14, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 arc.arc
View
@@ -1066,7 +1066,7 @@
; `(with (,a ,x ,b ,y) (if (> ,a ,b) ,a ,b))))
(def most (f seq)
- (unless (no seq)
+ (if seq
(withs (wins (car seq) topscore (f wins))
(each elt (cdr seq)
(let score (f elt)

0 comments on commit e2e3d93

Please sign in to comment.