diff options
author | Taco Hoekwater <taco@elvenkind.com> | 2006-12-18 09:15:51 +0000 |
---|---|---|
committer | Taco Hoekwater <taco@elvenkind.com> | 2006-12-18 09:15:51 +0000 |
commit | 432febb2eb8f8994f83e44f8e50b42f1a51a7e91 (patch) | |
tree | 7f066eee38f26698d394599426b6713163f8194f /Build/source | |
parent | b1e380b8def907bbacfaca3b14f8dc2e431226c7 (diff) |
0.993 (troff.map support)
git-svn-id: svn://tug.org/texlive/trunk@2784 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source')
-rw-r--r-- | Build/source/texk/web2c/mp.web | 6 | ||||
-rw-r--r-- | Build/source/texk/web2c/mpdir/mapfile.c | 11 | ||||
-rw-r--r-- | Build/source/texk/web2c/mpdir/mp.defines | 5 |
3 files changed, 15 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/mp.web b/Build/source/texk/web2c/mp.web index 640eb4a1114..8f8ef7eb6c8 100644 --- a/Build/source/texk/web2c/mp.web +++ b/Build/source/texk/web2c/mp.web @@ -97,8 +97,8 @@ undergoes any modifications, so that it will be clear which version of @^extensions to \MP@> @^system dependencies@> -@d banner=='This is MetaPost, Version 0.992' {printed when \MP\ starts} -@d metapost_version=="0.992" +@d banner=='This is MetaPost, Version 0.993' {printed when \MP\ starts} +@d metapost_version=="0.993" @ Different \PASCAL s have slightly different conventions, and the present @!@:PASCAL H}{\ph@> @@ -24203,7 +24203,7 @@ tini@/ ready_already:=314159; start_of_MP: @<Initialize the output routines@>; @<Get the first line of input and prepare to start@>; -mp_init_map_file; +mp_init_map_file(troff_mode); setjobid(internal[year],internal[month],internal[day],internal[time]); history:=spotless; {ready to go!} if start_sym>0 then {insert the `\&{everyjob}' symbol} diff --git a/Build/source/texk/web2c/mpdir/mapfile.c b/Build/source/texk/web2c/mpdir/mapfile.c index 25d5818f5c0..1893b55bfd7 100644 --- a/Build/source/texk/web2c/mpdir/mapfile.c +++ b/Build/source/texk/web2c/mpdir/mapfile.c @@ -941,7 +941,7 @@ void mpmapline (strnumber t) xfree (s); } -void mpinitmapfile (void) +void mpinitmapfile (int is_troff) { assert (mitem == NULL); mitem = xtalloc (1, mapitem); @@ -949,8 +949,13 @@ void mpinitmapfile (void) mitem->type = MAPFILE; if (kpse_find_file("mpost.map", kpse_fontmap_format,0)) mitem->line = xstrdup ("mpost.map"); - else - mitem->line = xstrdup ("pdftex.map"); + else { + if (is_troff) { + mitem->line = xstrdup ("troff.map"); + } else { + mitem->line = xstrdup ("pdftex.map"); + } + } } /**********************************************************************/ diff --git a/Build/source/texk/web2c/mpdir/mp.defines b/Build/source/texk/web2c/mpdir/mp.defines index bdd51f83332..90f196b1ff5 100644 --- a/Build/source/texk/web2c/mpdir/mp.defines +++ b/Build/source/texk/web2c/mpdir/mp.defines @@ -30,7 +30,7 @@ $Id$ @define function tfmoffm(); @define procedure mpmapfile(); @define procedure mpmapline(); -@define procedure mpinitmapfile; +@define procedure mpinitmapfile(); { functions from writefont.c } @@ -52,3 +52,6 @@ $Id$ @define procedure setjobid(); +{ function from turningnumber.c } + +@define function bezierslope();
\ No newline at end of file |