suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
svn: r3517
This commit is contained in:
Jacob Matthews 2006-06-28 06:59:12 +00:00
parent 6d1f299cfc
commit 343c734291
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/planet/private/planet-shared.ss
View File

@ -267,7 +267,7 @@ Various common pieces of code that both the client and server need to access
#f #f
(let ((best-row (let ((best-row
(car (car
(sort (quicksort
matches matches
(λ (a b) (> (assoc-table-row->min a) (assoc-table-row->min b))))))) (λ (a b) (> (assoc-table-row->min a) (assoc-table-row->min b)))))))
(make-pkg (make-pkg