guile-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

guile/guile-core/examples ChangeLog box-dynamic...


From: Martin Grabmueller
Subject: guile/guile-core/examples ChangeLog box-dynamic...
Date: Mon, 18 Jun 2001 12:09:31 -0700

CVSROOT:        /cvs
Module name:    guile
Changes by:     Martin Grabmueller <address@hidden>     01/06/18 12:09:31

Modified files:
        guile-core/examples: ChangeLog 
        guile-core/examples/box-dynamic-module: README 

Log message:
        2001-06-18  Martin Grabmueller  <address@hidden>
        
        * box-dynamic-module/README: Use a better example for box-map, as
        suggested by Thomas Wawrzinek.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/ChangeLog.diff?cvsroot=OldCVS&tr1=1.6&tr2=1.7&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/box-dynamic-module/README.diff?cvsroot=OldCVS&tr1=1.3&tr2=1.4&r1=text&r2=text

Patches:
Index: guile/guile-core/examples/ChangeLog
diff -u guile/guile-core/examples/ChangeLog:1.6 
guile/guile-core/examples/ChangeLog:1.7
--- guile/guile-core/examples/ChangeLog:1.6     Thu Jun 14 13:36:05 2001
+++ guile/guile-core/examples/ChangeLog Mon Jun 18 12:09:31 2001
@@ -1,3 +1,8 @@
+2001-06-18  Martin Grabmueller  <address@hidden>
+
+       * box-dynamic-module/README: Use a better example for box-map, as
+       suggested by Thomas Wawrzinek.
+
 2001-06-14  Martin Grabmueller  <address@hidden>
 
        * scripts/README, scripts/hello.scm, safe/untrusted.scm,
Index: guile/guile-core/examples/box-dynamic-module/README
diff -u guile/guile-core/examples/box-dynamic-module/README:1.3 
guile/guile-core/examples/box-dynamic-module/README:1.4
--- guile/guile-core/examples/box-dynamic-module/README:1.3     Thu Jun 14 
13:36:05 2001
+++ guile/guile-core/examples/box-dynamic-module/README Mon Jun 18 12:09:31 2001
@@ -66,8 +66,8 @@
 guile> (define bl  (make-box-list 1 2 3)) 
 guile> bl
 (#<box 1> #<box 2> #<box 3>)
-guile> (box-map (lambda (el) (make-box-list (list el))) bl)
-(#<box (#<box (1)>)> #<box (#<box (2)>)> #<box (#<box (3)>)>)
+guile> (box-map 1+ bl)
+(#<box 2> #<box 3> #<box 4>)
 guile> (quit)
 $
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]