mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-16 16:50:21 +02:00
Code Activity

Add get-bytevector-some!.

Browse source 
* libguile/r6rs-ports.c (scm_get_bytevector_some_x): New procedure.
* libguile/r6rs-ports.h (scm_get_bytevector_some_x): Add prototype.
(scm_unget_bytevector): Move prototype next to 'scm_get_bytevector_some_x'.
* module/ice-9/binary-ports.scm: Export 'get-bytevector-some!'.
* doc/ref/api-io.texi (Binary I/O): Document it.
This commit is contained in:
Mark H Weaver 2019-04-16 23:13:06 -04:00
parent a23ee74fab
commit cc73c2ab5d
4 changed files with 58 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
module/ice-9/binary-ports.scm
View file

@ -36,6 +36,7 @@
get-bytevector-n
get-bytevector-n!
get-bytevector-some
get-bytevector-some! ; Guile extension, not in R6RS
get-bytevector-all
get-string-n!
put-u8