quicksort -> sort

svn: r2574
2006-04-01 21:32:39 +00:00 · 2006-04-01 21:32:39 +00:00 · bceb2efa2c
commit bceb2efa2c
parent 6a751d4e92
1 changed files with 1 additions and 1 deletions
--- a/collects/string-constants/string-constant.ss
+++ b/collects/string-constants/string-constant.ss
@ -160,7 +160,7 @@
 				lang2-name)
 		       (for-each
 			(lambda (x) (fprintf sp "   ~s\n" x))
-			(quicksort
+			(sort
 			 constants
 			 (lambda (x y) (string<=? (symbol->string (car x)) (symbol->string (car y))))))
 		       (newline sp)))