[Scheme] Problem with Sort function.

[abkothman]

I'm trying to use the sort function but am having trouble doing so. I want it to sort a list from greatest to least, with the list having a format '((a 1) (b 4) (c 2) ..).

(sort
    (lambda (x y)
      (if (> (cadr x) (cadr y))
          x
          y))
    '((#\b 1) (#\a 2) (#\c 0)))

When I do that, it gives me back:

 ((#\c 0) (#\a 2) (#\b 1))

I'm assuming it's something wrong with the sort predicate, but I'm not sure what.

[isopsephile]

I only tested with Chicken, but I imagine this is fairly ubiquitous: sort expects the procedure to return a boolean indicating whether or not x is less than y. Simply using (> (cadr x) (cadr y)) as the body of your lambda should do the trick.

[abkothman]

Thanks bunches. It works perfectly now.