summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex')
-rw-r--r--Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex137
1 files changed, 137 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex b/Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex
new file mode 100644
index 00000000000..3e0892eb091
--- /dev/null
+++ b/Master/texmf-dist/tex/plain/cweb/cwebbin/fcwebmac.tex
@@ -0,0 +1,137 @@
+% standard macros for CWEB listings (in addition to plain.tex)
+% modified for use with "tex2pdf" --- March 1997
+% Version 2.0 --- Don Knuth, July 1990
+% Version 2.0 [german] --- Carsten Steger, October 1991
+% Version 2.0 [german] --- Andreas Scherer, February 1993
+% Version 2.7 --- Don Knuth, July 1992
+% Version 2.7 [p6c] --- Andreas Scherer, September 1993
+% Version 2.8 --- Don Knuth, September 1992
+% Version 2.8 [german] --- Carsten Steger, 1993
+% Version 2.8 [p7] --- Andreas Scherer, October 1993
+% Version 3.0 --- Don Knuth, June 1993
+% Version 3.0 [p8e] --- Andreas Scherer, November 1993
+% Version 3.1 [p9b] --- Andreas Scherer, January 1994
+% Version 3.1 [p9c] --- Andreas Scherer, March 1994
+% Version 3.1 [p9d] --- Andreas Scherer, July 1994
+% Version 3.2 [p10] --- Andreas Scherer, July 1994
+% Version 3.2 [p10a] --- Denis B. Roegel, September 1994
+% Version 3.3 [p10b] --- Andreas Scherer, October 1994
+% Version 3.3 [p11b] --- Andreas Scherer, March 1995
+% Version 3.4 [p13] --- Andreas Scherer, August 1995
+% Version 3.4 [p14] --- Andreas Scherer, March 1997
+% Version 3.42 [p15] --- Andreas Scherer, August 1998
+% Version 3.43 [p16] --- Andreas Scherer, October 1998
+% Version 3.5 [p17] --- Andreas Scherer, December 1999
+% Version 3.61 [p18] --- Andreas Scherer, July 2000
+% Version 3.63 [p19] --- Andreas Scherer, January 2001
+% Version 3.64 [p20] --- Andreas Scherer, March 2002
+% Version 3.64 [p21] --- Andreas Scherer, Octobre 2005
+% Version 3.64 [p22] --- Andreas Scherer, March 2016
+
+% french translations --- Denis Roegel, 18 September 1994
+
+\ifx\undefined\documentclass\input Xcwebmac.tex
+\else\endinput\fi % LaTeX will use other macros
+
+\def\.#1{\leavevmode\hbox{\tentex % typewriter type for strings
+ \ifx\Cstringchars\undefined\else\Cstringchars\fi % special string characters
+ \let\\=\BS % backslash in a string
+ \let\{=\LB % left brace in a string
+ \let\}=\RB % right brace in a string
+ \let\~=\TL % tilde in a string
+ \let\ =\SP % space in a string
+ \let\_=\UL % underline in a string
+ \let\&=\AM % ampersand in a string
+ \let\^=\CF % circumflex in a string
+ #1\kern.05em}}
+
+\def\postATL#1 #2 {\bf La lettre \\{\uppercase{\char"#1}}
+ est \string`\string`tanglee\string'\string' en \tentex "#2"\egroup\par}
+\def\ATH{{\acrofalse\X\kern-.5em:D\'efinitions du pr\'eprocesseur\X}}
+
+\def\A{\note{Voir aussi la section}} % xref for doubly defined section name
+\def\As{\note{Voir aussi les sections}} % xref for multiply defined
+ % section name
+
+\def\ET{ et~} % conjunction between two section numbers
+\def\ETs{ et~} % conjunction between the last two of several section numbers
+
+\def\Q{\note{Cette partie du programme est cit\'ee dans la section}}
+ % xref for mention of a section
+\def\Qs{\note{Cette partie du programme est cit\'ee dans les sections}}
+ % xref for mentions of a section
+
+\def\U{\note{Cette partie du programme est utilis\'ee dans la section}}
+ % xref for use of a section
+\def\Us{\note{Cette partie du programme est utilis\'ee dans les sections}}
+ % xref for uses of a section
+
+\gtitle={Sortie \.{CWEB}} % this running head is reset by starred sections
+\mark{\noexpand\nullsec0{\the\gtitle}}
+
+\def\ch{\note{Les sections suivantes ont \'et\'e modifi\'ees dans le
+ Change-File:}\let\*=\relax}
+
+\def\fin{\par\vfill\eject % this is done when we are ending the index
+ \ifpagesaved\null\vfill\eject\fi % output a null index column
+ \if L\lr\else\null\vfill\eject\fi % finish the current page
+ \ifpdftex \makebookmarks \fi % added in Version 3.68
+ \parfillskip 0pt plus 1fil
+ \def\grouptitle{NOMS DES SECTIONS}
+ \let\topsecno=\nullsec
+ \message{Noms des sections:}
+ \output={\normaloutput\page\lheader\rheader}
+ \setpage
+ \def\note##1##2.{\quad{\eightrm##1~\ifacro{\pdfnote##2.}\else{##2}\fi.}}
+ \def\Q{\note{Cit\'e dans la section}} % crossref for mention of a section
+ \def\Qs{\note{Cit\'e dans les sections}} % crossref for mentions of a section
+ \def\U{\note{Utilis\'e dans la section}} % crossref for use of a section
+ \def\Us{\note{Utilis\'e dans les sections}} % crossref for uses of a section
+ \def\I{\par\hangindent 2em}\let\*=*
+ \ifacro \def\outsecname{Noms des sections} \let\Xpdf\X
+% \ifpdftex \makebookmarks \pdfdest name {NOS} fitb % in versions < 3.68
+ \ifpdftex \pdfdest name {NOS} fith % changed in version 3.69
+ \pdfoutline goto name {NOS} count -\secno {\outsecname}
+ \def\X##1:##2\X{\Xpdf##1:##2\X \firstsecno##1.%
+ {\toksF={}\makeoutlinetoks##2\outlinedone\outlinedone}%
+ \pdfoutline goto num \the\toksA \expandafter{\the\toksE}}
+ \else\ifpdf
+ \special{pdf: outline -1 << /Title (\outsecname)
+ /Dest [ @thispage /FitH @ypos ] >>}
+ \def\X##1:##2\X{\Xpdf##1:##2\X \firstsecno##1.%
+ {\toksF={}\makeoutlinetoks##2\outlinedone\outlinedone}%
+ \special{pdf: outline 0 << /Title (\the\toksE)
+ /A << /S /GoTo /D (\romannumeral\the\toksA) >> >>}}
+ \fi\fi\fi
+ \readsections}
+\def\con{\par\vfill\eject % finish the section names
+% \ifodd\pageno\else\titletrue\null\vfill\eject\fi % for duplex printers
+ \rightskip 0pt \hyphenpenalty 50 \tolerance 200
+ \setpage \output={\normaloutput\page\lheader\rheader}
+ \titletrue % prepare to output the table of contents
+ \pageno=\contentspagenumber
+ \def\grouptitle{SOMMAIRE:}
+ \message{Sommaire:}
+ \topofcontents \startpdf
+ \line{\hfil Section\hbox to3em{\hss Page}}
+ \let\ZZ=\contentsline
+ \readcontents\relax % read the contents info
+ \botofcontents \end} % print the contents page(s) and terminate
+\def\today{\number\day.~\ifcase\month\or
+ Janvier\or F\'evrier\or Mars\or Avril\or Mai\or Juin\or
+ Juillet\or Ao\^ut\or Septembre\or Octobre\or Novembre\or D\'ecembre\fi
+ \space\number\year}
+\def\hours{\twodigits=\time \divide\twodigits by60 \printtwodigits
+ \null\space\sc h\space % distinguish between time and year
+ \multiply\twodigits by-60 \advance\twodigits by\time \printtwodigits}
+\def\datethis{\def\startsection{\leftline{\sc\today\ \`a \hours}\bigskip
+ \let\startsection=\stsec\stsec}}
+ % say `\datethis' in limbo, to get your listing timestamped before section 1
+%\def\datecontentspage{% versions up to 3.65
+% \def\topofcontents{\leftline{\sc\today\ \`a \hours}\bigskip
+% \centerline{\titlefont\title}\vfill}} % timestamps the contents page
+\def\datecontentspage{% changed in version 3.66
+ \def\botofcontents{\vfill
+ \centerline{\covernote}
+ \bigskip
+ \leftline{\sc\today\ \`a \hours}}} % timestamps the contents page