summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/omegaware
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2010-01-22 12:20:35 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2010-01-22 12:20:35 +0000
commit68267fad21f7506f4613a9f7308e3a7c46d8f8e6 (patch)
treeba6c54bce6ce66285dd776bd8db92b350517d027 /Build/source/texk/web2c/omegaware
parent249b1077f09eb70b8d06368e5fde89062bd82050 (diff)
constify various filename strings
git-svn-id: svn://tug.org/texlive/trunk@16799 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/omegaware')
-rw-r--r--Build/source/texk/web2c/omegaware/ChangeLog8
-rw-r--r--Build/source/texk/web2c/omegaware/odvitype.ch3
-rw-r--r--Build/source/texk/web2c/omegaware/ofm2opl.ch2
-rw-r--r--Build/source/texk/web2c/omegaware/opl2ofm.ch2
-rw-r--r--Build/source/texk/web2c/omegaware/otangle.ch2
-rw-r--r--Build/source/texk/web2c/omegaware/ovf2ovp.ch3
-rw-r--r--Build/source/texk/web2c/omegaware/ovp2ovf.ch2
7 files changed, 15 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/omegaware/ChangeLog b/Build/source/texk/web2c/omegaware/ChangeLog
index 9bfbae39443..63e7397f820 100644
--- a/Build/source/texk/web2c/omegaware/ChangeLog
+++ b/Build/source/texk/web2c/omegaware/ChangeLog
@@ -1,3 +1,11 @@
+2010-01-22 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * odvitype.ch (open_dvi_file): Skip use of cur_name.
+ * ofm2opl.ch (tfm_name, pl_name), opl2ofm.ch (tfm_name, pl_name),
+ otangle.ch (web_name, chg_name, pascal_name, pool_name),
+ ovf2ovp.ch (vf_name, vpl_name), ovp2ovf.ch (vpl_name, tfm_name,
+ vf_name): Declare as const_c_string.
+
2010-01-05 Peter Breitenlohner <peb@mppmu.mpg.de>
* repeat.test (new): Shell script to test repeat_char handling.
diff --git a/Build/source/texk/web2c/omegaware/odvitype.ch b/Build/source/texk/web2c/omegaware/odvitype.ch
index be75e4196f7..cf2893dfc66 100644
--- a/Build/source/texk/web2c/omegaware/odvitype.ch
+++ b/Build/source/texk/web2c/omegaware/odvitype.ch
@@ -122,8 +122,7 @@ end;
@y
@p procedure open_dvi_file; {prepares to read packed bytes in |dvi_file|}
begin
- cur_name := extend_filename (cmdline (optind), 'dvi');
- resetbin (dvi_file, cur_name);
+ resetbin (dvi_file, extend_filename (cmdline (optind), 'dvi'));
cur_loc := 0;
end;
@#
diff --git a/Build/source/texk/web2c/omegaware/ofm2opl.ch b/Build/source/texk/web2c/omegaware/ofm2opl.ch
index d9a586bfcd8..fac46b06d80 100644
--- a/Build/source/texk/web2c/omegaware/ofm2opl.ch
+++ b/Build/source/texk/web2c/omegaware/ofm2opl.ch
@@ -457,5 +457,5 @@ long_options[current_option].val := 0;
@ Global filenames.
@<Global...@> =
-@!tfm_name, @!pl_name:c_string;
+@!tfm_name, @!pl_name:const_c_string;
@z
diff --git a/Build/source/texk/web2c/omegaware/opl2ofm.ch b/Build/source/texk/web2c/omegaware/opl2ofm.ch
index 67172f602bd..1e134a69bd3 100644
--- a/Build/source/texk/web2c/omegaware/opl2ofm.ch
+++ b/Build/source/texk/web2c/omegaware/opl2ofm.ch
@@ -359,5 +359,5 @@ long_options[current_option].val := 0;
@ Global filenames.
@<Global...@> =
-@!tfm_name,@!pl_name:c_string;
+@!tfm_name,@!pl_name:const_c_string;
@z
diff --git a/Build/source/texk/web2c/omegaware/otangle.ch b/Build/source/texk/web2c/omegaware/otangle.ch
index 8fc89c42d15..84e5dc406ba 100644
--- a/Build/source/texk/web2c/omegaware/otangle.ch
+++ b/Build/source/texk/web2c/omegaware/otangle.ch
@@ -485,5 +485,5 @@ long_options[current_option].val := 0;
@ Global filenames.
@<Globals...@>=
-@!web_name,@!chg_name,@!pascal_name,@!pool_name:c_string;
+@!web_name,@!chg_name,@!pascal_name,@!pool_name:const_c_string;
@z
diff --git a/Build/source/texk/web2c/omegaware/ovf2ovp.ch b/Build/source/texk/web2c/omegaware/ovf2ovp.ch
index ee8adc26d57..9ab40b511c9 100644
--- a/Build/source/texk/web2c/omegaware/ovf2ovp.ch
+++ b/Build/source/texk/web2c/omegaware/ovf2ovp.ch
@@ -615,5 +615,6 @@ long_options[current_option].val := 0;
@ Global filenames.
@<Global...@> =
-@!vf_name, @!tfm_name, @!vpl_name:c_string;
+@!tfm_name:c_string;
+@!vf_name, @!vpl_name:const_c_string;
@z
diff --git a/Build/source/texk/web2c/omegaware/ovp2ovf.ch b/Build/source/texk/web2c/omegaware/ovp2ovf.ch
index 2fa615d0729..62c2b250bae 100644
--- a/Build/source/texk/web2c/omegaware/ovp2ovf.ch
+++ b/Build/source/texk/web2c/omegaware/ovp2ovf.ch
@@ -342,5 +342,5 @@ long_options[current_option].val := 0;
@ Global filenames.
@<Global...@> =
-@!vpl_name, @!tfm_name, @!vf_name:c_string;
+@!vpl_name, @!tfm_name, @!vf_name:const_c_string;
@z