[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, master, updated. release_1-9-5-6-g9a5e
From: |
Andy Wingo |
Subject: |
[Guile-commits] GNU Guile branch, master, updated. release_1-9-5-6-g9a5ee56 |
Date: |
Sat, 21 Nov 2009 18:03:35 +0000 |
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".
http://git.savannah.gnu.org/cgit/guile.git/commit/?id=9a5ee564fab678cacda3a2d8ab4cec613768e1e4
The branch, master has been updated
via 9a5ee564fab678cacda3a2d8ab4cec613768e1e4 (commit)
via d20eac70f87511c198dd70e6e6a152d2ac6c6933 (commit)
from 850a4c8f5f076fb5968c2204eefadf91dc7c56bd (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 9a5ee564fab678cacda3a2d8ab4cec613768e1e4
Author: Andy Wingo <address@hidden>
Date: Fri Nov 20 13:12:44 2009 +0100
better printing of procedures with keyword arguments
* module/system/vm/program.scm (arguments->lambda-list): Print keyword
arguments more sensibly.
commit d20eac70f87511c198dd70e6e6a152d2ac6c6933
Author: Andy Wingo <address@hidden>
Date: Fri Nov 20 17:24:40 2009 +0100
fix version-etc for older autoconf
* lib/version-etc.c: Don't reference the undefined PACKAGE if
PACKAGE_URL is undefined. Probably should go upstream.
-----------------------------------------------------------------------
Summary of changes:
lib/version-etc.c | 2 +-
module/system/vm/program.scm | 3 ++-
2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/lib/version-etc.c b/lib/version-etc.c
index 4f9de48..a7be46e 100644
--- a/lib/version-etc.c
+++ b/lib/version-etc.c
@@ -245,7 +245,7 @@ emit_bug_reporting_address (void)
printf (_("%s home page: <%s>\n"), PACKAGE_NAME, PACKAGE_URL);
#else
printf (_("%s home page: <http://www.gnu.org/software/%s/>\n"),
- PACKAGE_NAME, PACKAGE);
+ PACKAGE_NAME, PACKAGE_TARNAME);
#endif
fputs (_("General help using GNU software: <http://www.gnu.org/gethelp/>\n"),
stdout);
diff --git a/module/system/vm/program.scm b/module/system/vm/program.scm
index 24e3def..99f9a3c 100644
--- a/module/system/vm/program.scm
+++ b/module/system/vm/program.scm
@@ -180,7 +180,8 @@
(define (arguments->lambda-list arguments)
(let ((req (or (assq-ref arguments 'required) '()))
(opt (or (assq-ref arguments 'optional) '()))
- (key (or (assq-ref arguments 'keyword) '()))
+ (key (map keyword->symbol
+ (map car (or (assq-ref arguments 'keyword) '()))))
(rest (or (assq-ref arguments 'rest) '())))
`(,@req
,@(if (pair? opt) (cons #:optional opt) '())
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, master, updated. release_1-9-5-6-g9a5ee56,
Andy Wingo <=