[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-2-9-g2a0d
From: |
Andy Wingo |
Subject: |
[Guile-commits] GNU Guile branch, master, updated. release_1-9-2-9-g2a0db0e |
Date: |
Wed, 19 Aug 2009 10:28:29 +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=2a0db0e326137cbf3b462376872c1d9f06c2bd52
The branch, master has been updated
via 2a0db0e326137cbf3b462376872c1d9f06c2bd52 (commit)
from 6234ff203d640f56bc5d160d9fe882b0f02b1401 (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 2a0db0e326137cbf3b462376872c1d9f06c2bd52
Author: Andy Wingo <address@hidden>
Date: Wed Aug 19 12:20:58 2009 +0200
procedure-documentation works on vm procedures
* libguile/procs.c (scm_procedure_documentation): Add a hack so that
this function works for compiled procedures too.
-----------------------------------------------------------------------
Summary of changes:
libguile/procs.c | 4 ++++
1 files changed, 4 insertions(+), 0 deletions(-)
diff --git a/libguile/procs.c b/libguile/procs.c
index 93e35ab..d873ff5 100644
--- a/libguile/procs.c
+++ b/libguile/procs.c
@@ -179,6 +179,8 @@ scm_subr_p (SCM obj)
return 0;
}
+SCM_SYMBOL (sym_documentation, "documentation");
+
SCM_DEFINE (scm_procedure_documentation, "procedure-documentation", 1, 0, 0,
(SCM proc),
"Return the documentation string associated with @code{proc}. By\n"
@@ -190,6 +192,8 @@ SCM_DEFINE (scm_procedure_documentation,
"procedure-documentation", 1, 0, 0,
SCM code;
SCM_ASSERT (scm_is_true (scm_procedure_p (proc)),
proc, SCM_ARG1, FUNC_NAME);
+ if (SCM_PROGRAM_P (proc))
+ return scm_assq_ref (scm_program_properties (proc), sym_documentation);
switch (SCM_TYP7 (proc))
{
case scm_tcs_closures:
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, master, updated. release_1-9-2-9-g2a0db0e,
Andy Wingo <=