- (loop for name being the hash-keys
- of (ensure-java-method-table java-class)
- using (hash-value method)
- collect (cons name (expand-java-method method)))))
+ (sort (loop for name being the hash-keys
+ of (ensure-java-method-table java-class)
+ using (hash-value method)
+ collect (cons name (expand-java-method method)))
+ (lambda (x y) (string< (car x) (car y))))))