diff options
Diffstat (limited to 'Build/source/utils/vlna/TLPATCHES')
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/ChangeLog | 14 | ||||
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/TL-Changes | 18 | ||||
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/patch-01-warnings | 240 | ||||
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/patch-02-warnings | 26 | ||||
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/patch-03-warnings | 26 | ||||
-rw-r--r-- | Build/source/utils/vlna/TLPATCHES/patch-04-write-bin | 21 |
6 files changed, 345 insertions, 0 deletions
diff --git a/Build/source/utils/vlna/TLPATCHES/ChangeLog b/Build/source/utils/vlna/TLPATCHES/ChangeLog new file mode 100644 index 00000000000..ab84073218d --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/ChangeLog @@ -0,0 +1,14 @@ +2012-05-16 Peter Breitenlohner <peb@mppmu.mpg.de> + + * patch-04-write-bin (new): Use binary mode for output files. + From Akira Kakuto <kakuto@fuk.kindai.ac.jp> (W32TeX). + +2011-05-02 Peter Breitenlohner <peb@mppmu.mpg.de> + + * patch-0[123]-warnings (new): Document changes applied to the + vlna-1.5 source tree. + +2011-04-27 Karl Berry <karl@tug.org> + + * Import 1.5 from ftp://math.feld.cvut.cz/pub/olsak/vlna. + diff --git a/Build/source/utils/vlna/TLPATCHES/TL-Changes b/Build/source/utils/vlna/TLPATCHES/TL-Changes new file mode 100644 index 00000000000..353390c0867 --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/TL-Changes @@ -0,0 +1,18 @@ +Changes applied to the vlna-1.5 tree as obtained from: + ftp://math.feld.cvut.cz/pub/olsak/vlna/vlna-1.5.tar.gz + +Remove: + Makefile.in + aclocal.m4 + configure + depcomp + install-sh + missing + +Remove and regenerate in ../: + vlna.c + vlna.dvi + vlna.idx + vlna.scn + vlna.tex + diff --git a/Build/source/utils/vlna/TLPATCHES/patch-01-warnings b/Build/source/utils/vlna/TLPATCHES/patch-01-warnings new file mode 100644 index 00000000000..290b32176be --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/patch-01-warnings @@ -0,0 +1,240 @@ +2009-08-19 Peter Breitenlohner <peb@mppmu.mpg.de> + + * vlna.c: Use ANSI C function definitions, all static except main. + +diff -ur vlna-1.5.orig/vlna.w vlna-1.5/vlna.w +--- vlna-1.5.orig/vlna.w 2010-02-01 22:52:15.000000000 +0100 ++++ vlna-1.5/vlna.w 2011-05-02 15:58:47.000000000 +0200 +@@ -59,9 +59,7 @@ + + @ Základní rozvržení funkce |main|. + @<Hlavní program@>= +-int main (argc,argv) +- int argc; +- char **argv; ++int main (int argc, char **argv) + { + @<Lokální proměnné funkce |main|@>; + prog_name=argv[0]; status = OK; +@@ -112,7 +110,7 @@ + kulturně dlouhý string obsahující \.{\char92n} s formátovacími + požadavky. Byl jsem nucen to takto nehezky zapsat. + @<Pomocné funkce@>= +-void printusage () ++static void printusage (void) + { + fprintf(stderr, + "usage: vlna [opt] [filenames]\n" +@@ -204,8 +202,7 @@ + @ Definujeme funkci pro výpis chybového hlášení při neúspěšném otevření + souboru. + @<Pomocné funkce@>= +-void ioerr (f) +- char *f; ++static void ioerr (char *f) + { + fprintf(stderr, "%s: cannot open file %s\n", prog_name, f); + } +@@ -335,7 +332,7 @@ + } PATITEM; + typedef struct PATTERN { /* jeden pattern */ + PATITEM *patt; /* ukazatel na prvni pozici */ +- void (*proc)(); /* procedura spustena pri souhlasu patternu */ ++ void (*proc)(void); /* procedura spustena pri souhlasu patternu */ + struct PATTERN *next ; /* nasledujici v seznamu vsech patternu */ + } PATTERN; + +@@ -407,8 +404,7 @@ + ohlídat případnou chybu při alokaci, budeme allokovat paměť zprostředkovaně + pomocí funkce |myalloc|. + @<Pomocné funkce@>= +-void *myalloc (size) +- int size; ++static void *myalloc (int size) + { + void *p; + p = malloc (size); +@@ -425,8 +421,7 @@ + Vrátí ukazatel na nově alokované místo. Jednotlivé pozice patternu se musí + následovně alokovat pomocí |setpi|. + @<Pomocné funkce@>= +-PATTERN *setpattern (proc) @/ +- void (*proc)(); ++static PATTERN *setpattern (void (*proc)(void)) + { + PATTERN *pp; + pp = myalloc (sizeof (PATTERN)); +@@ -444,9 +439,7 @@ + |patt| ve struktuře |PATTERN| a další byly provázány položkou |next| ve + struktuře |PATITEM|. Poslední pozice má |next==NULL|. + @<Pomocné funkce@>= +-void setpi (str, flag) +- char *str; +- int flag; ++static void setpi (char *str, int flag) + { + PATITEM* p; + p = myalloc (sizeof (PATITEM)); +@@ -479,9 +472,7 @@ + + @ Definujme funkci |normalpattern|. + @<Pomocné funkce@>= +-PATTERN *normalpattern (proc, str) @/ +- void (*proc)(); +- char *str; ++static PATTERN *normalpattern (void (*proc)(void), char *str) + { + PATTERN *pp; + int j=0; +@@ -517,8 +508,7 @@ + @d FOUND -1 + @d NOFOUND -2 + @<Pomocné funkce@>= +-int match (p) +- PATITEM *p; ++static int match (PATITEM *p) + { + int m; + if (strchr (p->str, c) != NULL) m = 1; /* Znak nalezen */ +@@ -565,8 +555,7 @@ + implementovat jen přepínání mezi stavem čtení z oblasti komentáře + (|listpatt==commentlist|) a mimo komentář (|listpatt==normallist|); + @<Vlnkovací funkce |tie|@>= +-void tie (input, output) +- FILE *input, *output; ++static void tie (FILE *input, FILE *output) + { + int ap; /* ap je pocet otevrenych patternu */ + register int k, m, n; +@@ -736,7 +725,7 @@ + neboli vlnku. Nakonec připojíme zapamatovaný znak |p|, ovšem pokud před ním byla nula, + vložíme ji ještě před znak |p|. + @<Pomocné funkce@>= +-void vlnkain() ++static void vlnkain(void) + { + int i; + char p, z; +@@ -780,7 +769,7 @@ + situaci pouze zrušíme stávající (v pořadí druhé) \uv{\.{\char92n}} a + nebudeme vytvářet nové. Na výstupu bude soubor o jeden řádek kratší. + @<Pomocné funkce@>= +-void vlnkacr() ++static void vlnkacr(void) + { + char p, z; + int i, j; +@@ -850,7 +839,7 @@ + hodnotu proměnné |c|. Stačí tedy změnit hodnotu |c| a vlnkovací patterny se + neotevřou. + @<Pomocné funkce@>= +-void tielock () ++static void tielock (void) + { + c = 1; + } +@@ -859,7 +848,7 @@ + módu vlnky neděláme. Při zjištěném nesouladu v přechodech mezi + math-módy spustíme následující proceduru. + @<Pomocné funkce@>= +-void printwarning () ++static void printwarning (void) + { + if (!silent) + fprintf (stderr, +@@ -884,13 +873,13 @@ + } + + @ @<Pomocné funkce@>= +-void mathin () ++static void mathin (void) + { + if (mode!=TEXTMODE) printwarning (); + mode = MATHMODE; + normallist = listpatt = mathlist; + } +-void mathout () ++static void mathout (void) + { + if (mode!=MATHMODE) printwarning (); + mode = TEXTMODE; +@@ -902,7 +891,7 @@ + \.{\$\$} souhlasí ten druhý dolar s naším patternem, ale to už jsme uvnitř + display módu. V takovém případě také nic neděláme. + @<Pomocné funkce@>= +-void onedollar () ++static void onedollar (void) + { + if (buffnz[inz-3]=='\\' || (buffnz[inz-3]=='$' && buffnz[inz-4]!='\\')) return; + if (mode==DISPLAYMODE) printwarning (); +@@ -921,7 +910,7 @@ + setpi (cr, ONE); + + @ @<Pomocné funkce@>= +-void checkmode () ++static void checkmode (void) + { + if (mode!=TEXTMODE) { + printwarning (); +@@ -947,17 +936,17 @@ + } + + @ @<Pomocné funkce@>= +-void displayin () ++static void displayin (void) + { + if (mode!=TEXTMODE) printwarning (); + mode = DISPLAYMODE; normallist = listpatt = parcheck; + } +-void displayout () ++static void displayout (void) + { + if (mode!=DISPLAYMODE) printwarning(); + mode = TEXTMODE; normallist = listpatt = vlnkalist; + } +-void twodollars () ++static void twodollars (void) + { + if (buffnz[inz-3]=='\\') return; + if (mode==DISPLAYMODE) displayout (); +@@ -999,7 +988,7 @@ + int prevmode; + PATTERN *prevlist, *verboutlist[4]; + char verbchar[2]; +-void verbinchar () ++static void verbinchar (void) + { + prevmode = mode; + verbchar[0] = c; +@@ -1017,7 +1006,7 @@ + math. módu může být + \.{\char92hbox} a v něm lokálně verbatim konstrukce). + @<Pomocné funkce@>= +-void verbin () ++static void verbin (void) + { + int i; + i = 0; +@@ -1037,7 +1026,7 @@ + } + + @ @<Pomocné funkce@>= +-void verbout () ++static void verbout (void) + { + if (mode!=VERBMODE) return; + if (web && buffnz[inz-2] == '@@' && buffnz[inz-3] == '@@') return; +@@ -1059,11 +1048,11 @@ + normalpattern (tieon, "%.~.+"); + + @ @<Pomocné funkce@>= +-void tieoff () ++static void tieoff (void) + { + normallist = NULL; + } +-void tieon () ++static void tieon (void) + { + normallist = vlnkalist; + } diff --git a/Build/source/utils/vlna/TLPATCHES/patch-02-warnings b/Build/source/utils/vlna/TLPATCHES/patch-02-warnings new file mode 100644 index 00000000000..ac53828ba90 --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/patch-02-warnings @@ -0,0 +1,26 @@ +2009-08-22 Peter Breitenlohner <peb@mppmu.mpg.de> + + * vlna.w (normalpattern): Constify string arg. + Drop unused global 'pi'. + +diff -ur vlna-1.5.orig/vlna.w vlna-1.5/vlna.w +--- vlna-1.5.orig/vlna.w 2011-05-02 15:58:47.000000000 +0200 ++++ vlna-1.5/vlna.w 2011-05-02 16:00:12.000000000 +0200 +@@ -380,7 +380,7 @@ + PATITEM *lapi[MAXPATT]; /* pole ukazatelu na aktualni pozice */ + PATTERN *lapt[MAXPATT]; /* pole odpovidajicich ukazatelu na patterny */ + PATTERN *listpatt, *normallist, *commentlist, *pt, *lastpt=NULL; +-PATITEM *pi, *lastpi=NULL; ++PATITEM *lastpi=NULL; + char c; /* zrovna nacetny znak */ + char buff[MAXBUFF]; /* prechodny buffer */ + int ind; /* aktualni pozice prechodneho bufferu */ +@@ -472,7 +472,7 @@ + + @ Definujme funkci |normalpattern|. + @<Pomocné funkce@>= +-static PATTERN *normalpattern (void (*proc)(void), char *str) ++static PATTERN *normalpattern (void (*proc)(void), const char *str) + { + PATTERN *pp; + int j=0; diff --git a/Build/source/utils/vlna/TLPATCHES/patch-03-warnings b/Build/source/utils/vlna/TLPATCHES/patch-03-warnings new file mode 100644 index 00000000000..8e07f53981c --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/patch-03-warnings @@ -0,0 +1,26 @@ +2011-05-02 Peter Breitenlohner <peb@mppmu.mpg.de> + + * vlna.w (hexnum, settiestr): Declare as static. + (settiestr): Drop unused local variable 'c'. + +diff -ur vlna-1.5.orig/vlna.w vlna-1.5/vlna.w +--- vlna-1.5.orig/vlna.w 2011-05-02 16:00:12.000000000 +0200 ++++ vlna-1.5/vlna.w 2011-05-02 16:02:38.000000000 +0200 +@@ -172,14 +172,14 @@ + + @ Vyřešíme konverzi kódu zapsaného za parametrem \.{-x} na string |tiestr|. + @<Pomocné funkce@>= +-unsigned char hexnum(char c) { ++static unsigned char hexnum(char c) { + if (c >= '0' && c <= '9') return c - '0'; + if (c >= 'A' && c <= 'F') return c - 'A' + 10; + if (c >= 'a' && c <= 'f') return c - 'a' + 10; + printusage (), exit (BAD_OPTIONS); + } +-void settiestr(char *s) { +- int i, j, c; ++static void settiestr(char *s) { ++ int i, j; + i = strlen(s); + if ((i > 2*MAXLEN) || i%2 == 1) printusage (), exit (BAD_OPTIONS); + tiestrlen = i/2; diff --git a/Build/source/utils/vlna/TLPATCHES/patch-04-write-bin b/Build/source/utils/vlna/TLPATCHES/patch-04-write-bin new file mode 100644 index 00000000000..1948ab247bd --- /dev/null +++ b/Build/source/utils/vlna/TLPATCHES/patch-04-write-bin @@ -0,0 +1,21 @@ +diff -ur -x vlna.c -x vlna.dvi -x vlna.idx -x vlna.scn -x vlna.tex vlna-1.5.orig/vlna.w vlna-1.5/vlna.w +--- vlna-1.5.orig/vlna.w 2011-05-02 16:02:38.000000000 +0200 ++++ vlna-1.5/vlna.w 2012-06-16 18:43:33.000000000 +0200 +@@ -226,7 +226,7 @@ + infile = stdin; outfile = stdout; + if (argc >= 2) infile = fopen (argv[1], "r"); + if (infile == NULL) ioerr (argv[1]), exit (IO_ERR); +- if (argc == 3) outfile = fopen(argv[2], "w"); ++ if (argc == 3) outfile = fopen(argv[2], "wb"); + if (outfile == NULL) ioerr (argv[2]), exit (IO_ERR); + if (argc >= 2) filename = argv[1]; + else filename = NULL; +@@ -252,7 +252,7 @@ + if (infile == NULL) { + ioerr (argv[0]); continue; + } +- outfile = fopen (argv[0], "w"); ++ outfile = fopen (argv[0], "wb"); + if (outfile == NULL) { + ioerr (argv[0]); + rename (backup, argv[0]); |