diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-29 17:45:03 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-29 17:45:03 +0000 |
commit | cd9cc8075fb5769a93e80e78b526e8fc0cf1a427 (patch) | |
tree | 63b621b7e7b7b17439c427d16a61a6ffcb510375 /Build/source | |
parent | 44794074884def68cd9bdc3646481e006e6278c0 (diff) |
{CTIE] C and CWEB refreshing for ctie.w.
git-svn-id: svn://tug.org/texlive/trunk@55334 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source')
-rw-r--r-- | Build/source/texk/web2c/ctiedir/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/ctiedir/ctie-k.ch | 60 |
2 files changed, 63 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/ctiedir/ChangeLog b/Build/source/texk/web2c/ctiedir/ChangeLog index 7d9136b167e..fcbdf900ba0 100644 --- a/Build/source/texk/web2c/ctiedir/ChangeLog +++ b/Build/source/texk/web2c/ctiedir/ChangeLog @@ -1,3 +1,7 @@ +2020-05-29 Andreas Scherer <https://ascherer.github.io> + + * ctie-k.ch: C and CWEB refreshing for ctie.w. + 2020-04-30 Andreas Scherer <https://ascherer.github.io> * ctie-k.ch: More editorial modifications for ctie.w. diff --git a/Build/source/texk/web2c/ctiedir/ctie-k.ch b/Build/source/texk/web2c/ctiedir/ctie-k.ch index 4a38a0319e7..4300860795b 100644 --- a/Build/source/texk/web2c/ctiedir/ctie-k.ch +++ b/Build/source/texk/web2c/ctiedir/ctie-k.ch @@ -19,10 +19,32 @@ @x l.19 Add macro definitions \def\title{The CTIE processor} +\def\botofcontents{% +\vfill +$\copyright$ 2002,2003 Julian Gilbey @y \def\Kpathsea/{{\mc KPATHSEA\spacefactor1000}} \def\title{The CTIE processor} +\def\covernote{\vbox{\ninerm\noindent +$\copyright$ 2002,2003 Julian Gilbey +@z + +@x l.37 +} +@y +}} +@z + +@x l.81 +@d copyright + "Copyright 2002,2003 Julian Gilbey. All rights reserved. There is no warranty.\n\ +Run with the --version option for other important information." +@y +@d copyright + "Copyright 2002,2003 Julian Gilbey."@| + " All rights reserved. There is no warranty.\n"@| + "Run with the --version option for other important information." @z @x l.102 @@ -103,6 +125,22 @@ This variable must be initialized. This variable must be initialised. @z +@x l.158 +@d spotless 0 +@d troublesome 1 +@d fatal 2 + +@<Global variables@>= +int history=spotless; +@y +@<Global variables@>= +typedef enum { + spotless, + troublesome, + fatal } return_code; +static return_code history=spotless; +@z + @x l.170 The kpathsea include files must be first. predefined as we include the \.{stdio.h} definitions. @@ -311,6 +349,14 @@ int wrap_up() int wrap_up (void) @z +@x l.667 + if (history > spotless) return 1; + else return 0; +@y + if (history > spotless) return EXIT_FAILURE; + else return EXIT_SUCCESS; +@z + @x l.674 int wrap_up(); @y @@ -490,6 +536,12 @@ usage_error (void) fprintf(stderr, "Usage: ctie -m|-c outfile master changefile(s)\n"); @z +@x l.1111 + exit(1); +@y + exit(EXIT_FAILURE); +@z + @x l.1119 Add Web2C version to banner string printf("%s\n", banner); /* print a ``banner line'' */ @y @@ -537,6 +589,12 @@ usage_help (void) const_string *message=CTIEHELP; @z +@x l.1248 + exit(0); +@y + exit(EXIT_SUCCESS); +@z + @x l.1253 void print_version_and_exit(name, version) string name, version; @@ -568,7 +626,7 @@ print_version_and_exit (const_string name, const_string version) puts ("Primary author of CTIE: Julian Gilbey."); puts ("Kpathsea written by Karl Berry and others."); - exit (0); + exit (EXIT_SUCCESS); } @z |