diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2014-01-07 08:00:08 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2014-01-07 08:00:08 +0000 |
commit | e083bdf89d31440fee7384cae4a11bc22812ba39 (patch) | |
tree | 52e09a27ba14b408cff235273114894c737a75a7 /Build | |
parent | 96ccbcad76347af62e5e9a6586d5484ebe0b2b1c (diff) |
web2c: Consistent white space
git-svn-id: svn://tug.org/texlive/trunk@32597 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r-- | Build/source/texk/web2c/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/mplibdir/mp.w | 2 | ||||
-rw-r--r-- | Build/source/texk/web2c/pltotf.ch | 3 | ||||
-rw-r--r-- | Build/source/texk/web2c/vptovf.ch | 5 |
4 files changed, 8 insertions, 6 deletions
diff --git a/Build/source/texk/web2c/ChangeLog b/Build/source/texk/web2c/ChangeLog index 4f22f9e6a66..650ddabbf12 100644 --- a/Build/source/texk/web2c/ChangeLog +++ b/Build/source/texk/web2c/ChangeLog @@ -1,3 +1,7 @@ +2014-01-06 Peter Breitenlohner <peb@mppmu.mpg.de> + + * pltotf.ch, vptovf.ch: Consistent white space. + 2014-01-02 Peter Breitenlohner <peb@mppmu.mpg.de> * ac/web2c.ac, configure.ac: Use X toolkit for METAFONT only if diff --git a/Build/source/texk/web2c/mplibdir/mp.w b/Build/source/texk/web2c/mplibdir/mp.w index ebd6897e38d..3b9a81e2f74 100644 --- a/Build/source/texk/web2c/mplibdir/mp.w +++ b/Build/source/texk/web2c/mplibdir/mp.w @@ -30068,7 +30068,7 @@ void mp_do_new_internal (MP mp) { set_equiv (cur_sym(), mp->int_ptr); if (internal_name (mp->int_ptr) != NULL) xfree (internal_name (mp->int_ptr)); - set_internal_name (mp->int_ptr, + set_internal_name (mp->int_ptr, mp_xstrdup (mp, mp_str (mp, text (cur_sym())))); if (the_type == mp_string_type) { set_internal_string (mp->int_ptr, mp_rts(mp,"")); diff --git a/Build/source/texk/web2c/pltotf.ch b/Build/source/texk/web2c/pltotf.ch index 921cdaeec79..417fda30907 100644 --- a/Build/source/texk/web2c/pltotf.ch +++ b/Build/source/texk/web2c/pltotf.ch @@ -34,8 +34,7 @@ procedure initialize; {this procedure gets things started properly} @<Define |parse_arguments|@> procedure initialize; {this procedure gets things started properly} var @<Local variables for initialization@>@/ -begin - kpse_set_program_name (argv[0], my_name); + begin kpse_set_program_name (argv[0], my_name); parse_arguments; @z diff --git a/Build/source/texk/web2c/vptovf.ch b/Build/source/texk/web2c/vptovf.ch index 333f132c51c..7c3c4abffb0 100644 --- a/Build/source/texk/web2c/vptovf.ch +++ b/Build/source/texk/web2c/vptovf.ch @@ -23,9 +23,8 @@ procedure initialize; {this procedure gets things started properly} @<Define |parse_arguments|@> procedure initialize; {this procedure gets things started properly} var @<Local variables for initialization@>@/ - begin - kpse_set_program_name (argv[0], my_name); - parse_arguments; + begin kpse_set_program_name (argv[0], my_name); + parse_arguments; @z @x [3] Increase constants. |