summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNeil Jerram <neil@ossau.uklinux.net>2000-08-12 22:18:04 +0000
committerNeil Jerram <neil@ossau.uklinux.net>2000-08-12 22:18:04 +0000
commitee826bae22c7fd1bd62d49752552a6adb44b9c1c (patch)
treedb8cdf3f6b7c43d3621337d2639e773ed8cb8d1c
parent1670bef99183d4dbbbfbdc69c5b3c9d9e84dffc9 (diff)
downloadguile-ee826bae22c7fd1bd62d49752552a6adb44b9c1c.tar.gz
Docstring updated so that make-soft-port example is correct.
-rw-r--r--libguile/ChangeLog3
-rw-r--r--libguile/vports.c2
2 files changed, 4 insertions, 1 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index b8761c918..b15492ffe 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,5 +1,8 @@
2000-08-12 Neil Jerram <neil@ossau.uklinux.net>
+ * vports.c (s_scm_make_soft_port): Docstring updated so that
+ example is correct.
+
* strop.c: Docstring fixes - quotation marks and backslashes
needed quoting.
diff --git a/libguile/vports.c b/libguile/vports.c
index 264c1c032..d36888606 100644
--- a/libguile/vports.c
+++ b/libguile/vports.c
@@ -175,7 +175,7 @@ SCM_DEFINE (scm_make_soft_port, "make-soft-port", 2, 0, 0,
" (lambda () (char-upcase (read-char)))\n"
" (lambda () (display \"@@\" stdout)))\n"
" \"rw\"))\n\n"
- "(write p p) @result{} #<input-output-soft#\space45d10#\>\n"
+ "(write p p) @result{} #<input-output: soft 8081e20>\n"
"@end example")
#define FUNC_NAME s_scm_make_soft_port
{