diff options
author | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2016-02-01 02:55:25 +0000 |
---|---|---|
committer | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2016-02-01 02:55:25 +0000 |
commit | 95d8ae1bb7db4490e61166bba0b7862d5cc78f03 (patch) | |
tree | 7a6bd979c873785e4639f11c7014751c6c854da7 /Build/source/texk/ptexenc/ptexenc.c | |
parent | 8ae654836fae207b632e089d0bfafc6bb6ac8f4c (diff) |
texk/ptexenc, web2c/eptexdir, web2c/euptexdir: add a new primitive \epTeXinputencoding. (from N. Abe).
git-svn-id: svn://tug.org/texlive/trunk@39532 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/ptexenc/ptexenc.c')
-rw-r--r-- | Build/source/texk/ptexenc/ptexenc.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Build/source/texk/ptexenc/ptexenc.c b/Build/source/texk/ptexenc/ptexenc.c index 23b9ea4f052..4ad5bc6b186 100644 --- a/Build/source/texk/ptexenc/ptexenc.c +++ b/Build/source/texk/ptexenc/ptexenc.c @@ -840,6 +840,14 @@ long input_line2(FILE *fp, unsigned char *buff, long pos, return last; } +boolean setinfileenc(FILE *fp, const char *str){ + int enc; + enc = string_to_enc(str); + if (enc < 0) return false; + infile_enc[fileno(fp)] = enc; + return true; +} + #ifdef WIN32 void clear_infile_enc(FILE *fp) { |