| blob | 9dbe65cf6012e5565baa895b6e2d4afe4a724410 |
1 %$PDFLaTeX -*- coding: utf-8 -*-\r
2 \input{test2e}\r
3 \documentclass[french,german]{article}\r
4 \START\r
5 \AUTHOR{Javier Bezos}\r
6 \FORMAT{LaTeX2e <2011/06/27>}\r
7 \CLASS[french,german]{article}\r
8 \PACKAGE[strings=generic,main=french]{babel}\r
9 \OMIT\r
10 \r
11 \usepackage[strings=generic,main=french]{babel}\r
12 \r
13 \def\Show#1{{%\r
14 {\edef\Temp{\meaning#1}%\r
15 \message{^^J\string#1 \string= \Temp^^J}}}}\r
16 \r
17 \addto\extrasgerman{\moregerman}\r
18 \r
19 \StartBabelCommands{german,spanish}{more}\r
20 \SetString\macroA{A}\r
21 \SetString\macroB{B}\r
22 \SetStringLoop{macro#1}{\"a,\"o,\"u}\r
23 \SetCase[\aa\OE]{\uccode`q=`X}{\lccode`Q=`x} % Just a test\r
24 \EndBabelCommands\r
25 \r
26 \StartBabelCommands{german,spanish}{more}\r
27 \SetString\macroN{N}\r
28 \EndBabelCommands\r
29 \r
30 \begin{document}\r
31 \TIMO\r
32 \r
33 \Show\languagename\r
34 \r
35 \MakeUppercase{\gdef\noexpand\testuc{qa\aa}}\r
36 \MakeLowercase{\gdef\noexpand\testlc{QA\OE}}\r
37 \r
38 \Show\testuc\r
39 \Show\testlc\r
40 \r
41 \selectlanguage{german}\r
42 \r
43 \MakeUppercase{\gdef\noexpand\testuc{qa\aa}}\r
44 \MakeLowercase{\gdef\noexpand\testlc{QA\OE}}\r
45 \r
46 \Show\testuc\r
47 \Show\testlc\r
48 \r
49 \Show\moregerman\r
50 \Show\macroA\r
51 \Show\germanmacroA\r
52 \Show\macroB\r
53 \Show\germanmacroB\r
54 \Show\macroi\r
55 \Show\germanmacroi\r
56 \Show\macroii\r
57 \Show\germanmacroii\r
58 \Show\macroiii\r
59 \Show\germanmacroiii\r
60 \Show\macroN\r
61 \Show\germanmacroN\r
62 \r
63 \Show\morespanish\r
64 \Show\spanishmacroA\r
65 \r
66 \OMIT\r
67 \end{document}\r