File: french.all

package info (click to toggle)
tetex-french 4.02-1
  • links: PTS
  • area: non-free
  • in suites: hamm
  • size: 3,572 kB
  • ctags: 137
  • sloc: ansic: 1,455; makefile: 74; csh: 43; sh: 31
file content (39 lines) | stat: -rw-r--r-- 1,741 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
% This is the french test to check if all french macros exist and are running.
%                           Copyright GUTenberg-Bernard Gaulle as in french.doc
%
% to be used only for testing/debugging purposes.
%
%                                                                 rev. 97/12/23
%%
%%      checksum        = "53228 39 106 1741"
%%
{\catcode`\]=13\def]{}
                         \message{-43- french.all now LOADED^^J}
\def\DmyDeF#1{\def\LaMacro{\expandafter\noexpand\csname#1\endcsname}
              \message{^^J}
            \expandafter\ifx\csname#1\endcsname\relax
                         \message{-44- ERRROR command \LaMacro is undefined!}
                        \else
                        \message{-45- executing \LaMacro}
                         \expandafter\csname#1\endcsname\relax
                        \fi
             }%
\def\Dmydef#1,#2]{\DmyDeF{#1}%
                  \def\temp{#2}\ifx\temp\empty\let\Dmydef\relax\fi%
                  \Dmydef#2]}%
\def\dummydef[{\Dmydef}%
% Here are all the french defs names
\def\>{>}\def\<{<}\def\!{!}% simulation
% following code can't be executed asis
\ifx\frenchtest\undefined\else\let\frenchtest\empty\fi
\ifx\frenchdoc\undefined\else\let\frenchdoc\empty\fi
\ifx\figurette\undefined\else\let\figurette\empty\fi
\ifx\endfigurette\undefined\else\let\endfigurette\empty\fi
\ifx\GOfrench\undefined\else\let\GOfrench\empty\fi
\ifx\vert\undefined\else\let\vert\empty\fi
\ifx\tilde\undefined\else\let\tilde\empty\fi
\ifx\originaloutput\undefined\else\let\originaloutput\empty\fi
\ifx\unnumberedcaptions\undefined\else\let\unnumberedcaptions\empty\fi
\input french.cmd % load all french cmd names
\endinput
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%