diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2015-01-15 17:50:50 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2015-01-15 17:50:50 +0200 |
| commit | 0f238ea450b3a976f04c95c4cf8befaadad1cdd0 (patch) | |
| tree | cd278a1441bd610bd91eb7fbd6f38aea7aa4bca8 /admin/unidata | |
| parent | 3b7eed4ebb3c18799ec791d0c6bd53c019f48f73 (diff) | |
| download | emacs-0f238ea450b3a976f04c95c4cf8befaadad1cdd0.tar.gz | |
Add set-binary-mode primitive to switch a standard stream to binary I/O.
src/fileio.c: Include binary-io.h.
(Fset_binary_mode): New function.
(syms_of_fileio): Defsubr it.
(syms_of_fileio) <Qstdin, Qstdout, Qstderr>: DEFSYM them.
admin/unidata/unidata/uvs.el (uvs-print-table-ivd): Call set-binary-mode on
stdout.
doc/lispref/streams.texi (Input Functions): Document 'set-binary-mode'.
(Output Functions): Cross-reference to documentation of
'set-binary-mode'.
etc/NEWS: Mention 'set-binary-mode'.
Diffstat (limited to 'admin/unidata')
| -rw-r--r-- | admin/unidata/uvs.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/admin/unidata/uvs.el b/admin/unidata/uvs.el index 8bad523ce35..a6beac97db4 100644 --- a/admin/unidata/uvs.el +++ b/admin/unidata/uvs.el @@ -200,6 +200,7 @@ corresponding number." (insert-file-contents filename) (uvs-alist-from-ivd collection-id sequence-id-to-glyph-func)))) + (set-binary-mode 'stdout t) (princ "/* Automatically generated by uvs.el. */\n") (princ (format "static const unsigned char mac_uvs_table_%s_bytes[] =\n {\n" |