diff options
author | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2019-11-13 10:13:31 +0000 |
---|---|---|
committer | Hironobu Yamashita <h.y.acetaminophen@gmail.com> | 2019-11-13 10:13:31 +0000 |
commit | febfa49f76b9698e3362af058db3ab357e3712fe (patch) | |
tree | 7df4a3c3fcfecebe2d476aa32476f4486913affc /Build/source/texk/web2c/euptexdir | |
parent | a4328383d0732ad601a025a99afdf1eb3052cc05 (diff) |
e[u]ptex: add \current[x]spacingmode, \currentcjktoken
git-svn-id: svn://tug.org/texlive/trunk@52770 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/euptexdir')
-rw-r--r-- | Build/source/texk/web2c/euptexdir/euptex.ch1 | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/euptexdir/euptex.ch1 b/Build/source/texk/web2c/euptexdir/euptex.ch1 index d33a3df7552..35af4241760 100644 --- a/Build/source/texk/web2c/euptexdir/euptex.ch1 +++ b/Build/source/texk/web2c/euptexdir/euptex.ch1 @@ -12,6 +12,12 @@ @d uptex_version_code=ptex_minor_version_code+2 {code for \.{\\uptexversion}} @z +@x e-upTeX: \currentcjktoken +@d eTeX_dim=eTeX_int+10 {first of \eTeX\ codes for dimensions} +@y +@d eTeX_dim=eTeX_int+11 {first of \eTeX\ codes for dimensions} +@z + @x eptex_version_code: print_esc("epTeXversion"); @y @@ -76,3 +82,24 @@ if j=1 then begin buffer[m]:=info(p) mod max_char_val; incr(m); p:=link(p); end; @z + +@x e-upTeX: fetch \(disable|enable|force)cjktoken status +@* \[54] System-dependent changes. +@y +@ The \.{\\currentcjktoken} command returns the current \upTeX's +status of \.{\\(disable|enable|force)cjktoken}. + +@d current_cjk_token_code=eTeX_int+10 {code for \.{\\currentcjktoken}} + +@<Generate all \eTeX...@>= +primitive("currentcjktoken",last_item,current_cjk_token_code); +@!@:current_cjk_token_}{\.{\\currentcjktoken} primitive@> + +@ @<Cases of |last_item| for |print_cmd_chr|@>= +current_cjk_token_code: print_esc("currentcjktoken"); + +@ @<Cases for fetching an integer value@>= +current_cjk_token_code: cur_val:=enable_cjk_token; + +@* \[54] System-dependent changes. +@z |