diff options
Diffstat (limited to 'Build/source/texk/web2c/pmpostdir/psvgout.ch')
-rw-r--r-- | Build/source/texk/web2c/pmpostdir/psvgout.ch | 77 |
1 files changed, 0 insertions, 77 deletions
diff --git a/Build/source/texk/web2c/pmpostdir/psvgout.ch b/Build/source/texk/web2c/pmpostdir/psvgout.ch deleted file mode 100644 index 5e624585709..00000000000 --- a/Build/source/texk/web2c/pmpostdir/psvgout.ch +++ /dev/null @@ -1,77 +0,0 @@ -@x -#include <math.h> -@y -#include <math.h> -#include <ptexenc/ptexenc.h> -#ifdef UPMP -#include <ptexenc/unicode.h> -#endif -@z - -@x -@<Character |k| is not allowed in SVG output@>= - (k=='&')||(k=='>')||(k=='<') -@y -@<Character |k| is not allowed in SVG output@>= - (k=='&')||(k=='>')||(k=='<')||(k>=0x7F) -@z - -@x -@ Now for outputting the actual graphic objects. -@y -@ Now for outputting the actual graphic objects. - -@d yoko_jfm_id 11 /* `yoko-kumi' fonts */ -@d tate_jfm_id 9 /* `tate-kumi' fonts */ -@d font_jfm_p(A) (mp->font_id[(A)]!=0) -@z - -@x Even if prologues=3, Japanese texts are not converted into paths. - if (prologues == 3 ) { -@y - if (prologues == 3 && mp->font_id[gr_font_n(p)]==0) { -@z - -@x To realise vertical Japanese texts ... - mp_svg_attribute(mp, "font-size", mp->svg->buf); -@y - mp_svg_attribute(mp, "font-size", mp->svg->buf); - if ( mp->font_id[gr_font_n(p)]==tate_jfm_id ) { - mp_svg_reset_buf(mp); - append_string("tb-rl"); - mp_svg_attribute(mp, "writing-mode", mp->svg->buf); - } -@z - -@x - while (l-->0) { -@y - if ( mp->font_id[gr_font_n(p)]!=0 ) { -#ifdef UPMP - if (is_internalUPTEX() ) { - while (l>0) { - append_string("&#"); - mp_svg_store_int(mp,UTF8StoUCS(s)); - append_char(';'); - k = UTF8length((int)*s); s += k; l -= k; - } - } else /* 1 charatcer = 2 bytes */ -#endif - { - l >>= 1; - while (l-->0) { - k =((int)*s++)*0x100; k += (int)*s++; - append_string("&#"); - mp_svg_store_int(mp,toUCS(k)); - append_char(';'); - } - } - } else - while (l-->0) { -@z - -@x - mp_svg_print(mp, "<?xml version=\"1.0\"?>"); -@y - mp_svg_print(mp, "<?xml version=\"1.0\" encoding=\"utf-8\"?>"); -@z |