better example

rob7hunter · Dec 17, 2008 · 0ab98a9 · 0ab98a9
1 parent 509de3d
commit 0ab98a9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/util.scm b/util.scm
@@ -436,7 +436,7 @@
 ;; (-> (listof any?) any? (listof any?))
 ;;
 ;; Analagous to string-join.
-;; E.g., (list-join '(a b c) "hi!") => (a "hi" b "hi" c)
+;; E.g., (list-join '(a b c) '(x x)) => (a (x x) b (x x) c)
 ;;
 (define (list-join lst joiner)
   (concatenate (pair-fold-right (lambda (pair acc)