[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.7-27-g18c5bf
From: |
Andy Wingo |
Subject: |
[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.7-27-g18c5bff |
Date: |
Fri, 11 Jan 2013 20:28:58 +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=18c5bffe96947ee82a29b115e758d7357cefbbe9
The branch, stable-2.0 has been updated
via 18c5bffe96947ee82a29b115e758d7357cefbbe9 (commit)
from 5ed4ea90a9abe64c024bbc0c664476b0673556b3 (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 18c5bffe96947ee82a29b115e758d7357cefbbe9
Author: Andy Wingo <address@hidden>
Date: Fri Jan 11 21:28:51 2013 +0100
Docstrings in (ice-9 iconv)
* module/ice-9/iconv.scm: Add docstrings.
-----------------------------------------------------------------------
Summary of changes:
module/ice-9/iconv.scm | 7 +++++++
1 files changed, 7 insertions(+), 0 deletions(-)
diff --git a/module/ice-9/iconv.scm b/module/ice-9/iconv.scm
index 0f0c1a3..a8b7458 100644
--- a/module/ice-9/iconv.scm
+++ b/module/ice-9/iconv.scm
@@ -45,6 +45,8 @@
(define* (call-with-encoded-output-string encoding proc
#:optional
(conversion-strategy 'error))
+ "Call PROC on a fresh port. Encode the resulting string as a
+bytevector according to ENCODING, and return the bytevector."
(if (string-ci=? encoding "utf-8")
;; I don't know why, but this appears to be faster; at least for
;; serving examples/debug-sxml.scm (1464 reqs/s versus 850
@@ -62,6 +64,8 @@
(define* (string->bytevector str encoding
#:optional (conversion-strategy 'error))
+ "Encode STRING according to ENCODING, which should be a string naming
+a character encoding, like \"utf-8\"."
(if (string-ci=? encoding "utf-8")
(string->utf8 str)
(call-with-encoded-output-string
@@ -72,6 +76,9 @@
(define* (bytevector->string bv encoding
#:optional (conversion-strategy 'error))
+ "Decode the string represented by BV. The bytes in the bytevector
+will be interpreted according to ENCODING, which should be a string
+naming a character encoding, like \"utf-8\"."
(if (string-ci=? encoding "utf-8")
(utf8->string bv)
(let ((p (open-bytevector-input-port bv)))
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.7-27-g18c5bff,
Andy Wingo <=