summaryrefslogtreecommitdiff
path: root/doc/tutorial
diff options
context:
space:
mode:
Diffstat (limited to 'doc/tutorial')
-rw-r--r--doc/tutorial/ChangeLog7
-rw-r--r--doc/tutorial/guile-tut.texi6
2 files changed, 10 insertions, 3 deletions
diff --git a/doc/tutorial/ChangeLog b/doc/tutorial/ChangeLog
index 86a9dc6a2..7dd52f5d7 100644
--- a/doc/tutorial/ChangeLog
+++ b/doc/tutorial/ChangeLog
@@ -1,3 +1,10 @@
+2003-09-27 Neil Jerram <neil@ossau.uklinux.net>
+
+ * guile-tut.texi (Using Guile to program in Scheme): Fix result of
+ `(reverse ls)', and change `squaring function' example to use `(*
+ n n)' instead of `(expt n n)'. Thanks to Jack Pavlovsky for
+ pointing these out.
+
2003-05-27 Dirk Herrmann <D.Herrmann@tu-bs.de>
* guile-tut.texi: Fix example, where a vector constant is used
diff --git a/doc/tutorial/guile-tut.texi b/doc/tutorial/guile-tut.texi
index 9379f6ee8..d38638b10 100644
--- a/doc/tutorial/guile-tut.texi
+++ b/doc/tutorial/guile-tut.texi
@@ -523,7 +523,7 @@ guile> @kbd{(caddr ls)}
guile> @kbd{(append ls (list 8 9 10))}
@result{} (1 2 3 4 5 6 7 8 9 10)
guile> @kbd{(reverse ls)}
- @result{} (10 9 8 7 6 5 4 3 2 1)
+ @result{} (7 6 5 4 3 2 1)
;; @r{ask if 12 is in the list --- it obviously is not}
guile> @kbd{(memq 12 ls)}
@result{} #f
@@ -552,8 +552,8 @@ guile> @kbd{(map sin ls2)}
@result{} (0.909297426825682 0.141120008059867 -0.756802495307928)
;; @r{make a list in which the squaring function has been}
;; @r{applied to all elements of @code{ls}}
-guile> @kbd{(map (lambda (n) (expt n n)) ls)}
- @result{} (1 4 27 256 3125 46656 823543)
+guile> @kbd{(map (lambda (n) (* n n)) ls)}
+ @result{} (1 4 9 16 25 36 49)
@end smalllisp
@smalllisp