soltools/cpp/Test.txt

   1 /*
   2  * This file is part of the LibreOffice project.
   3  *
   4  * This Source Code Form is subject to the terms of the Mozilla Public
   5  * License, v. 2.0. If a copy of the MPL was not distributed with this
   6  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   7  *
   8  * This file incorporates work covered by the following license notice:
   9  *
  10  *   Licensed to the Apache Software Foundation (ASF) under one or more
  11  *   contributor license agreements. See the NOTICE file distributed
  12  *   with this work for additional information regarding copyright
  13  *   ownership. The ASF licenses this file to you under the Apache
  14  *   License, Version 2.0 (the "License"); you may not use this file
  15  *   except in compliance with the License. You may obtain a copy of
  16  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  17  */
  18
  19 #define ABC \
  20                 ggg
  21
  22 ABC
  23
  24 /* Standards */
  25
  26 #define NOTHING
  27 NOTHING
  28
  29 #define SYMBOL symbol
  30 #undef SYMBOL
  31 #define SYMBOL _symbol_
  32
  33 < SYMBOL >                      // < _symbol_ >
  34 xSYMBOLx                        // xSYMBOLx
  35 +SYMBOL-                        // +_symbol_-
  36 >SYMBOL<                        // >_symbol_<
  37 <SYMBOL>                        // <_symbol_>
  38
  39 #define FALSE 0
  40 #define TRUE  !FALSE
  41 a = x > 0 ? TRUE : FALSE        // a = x > 0 ? !0 : 0
  42
  43 #define A x
  44 #define B y
  45 #define MAC(a, b) \
  46         T() { a(); return b; }      // T() { x(); return y; }
  47 MAC(A,B);
  48
  49 #ifdef MAC
  50 MAC(X,Y)
  51 #endif // MAC
  52
  53 /* Recursions */
  54
  55 #define y x
  56 #define x y
  57 x                               // x
  58
  59 #define Test(a) a
  60 #define b Test(b)
  61 a = b;                          // a = b;
  62
  63 #define func abc(func)
  64 a = func                        // a = abc(func)
  65
  66 #define func1 func(abc)
  67 a = func1                       // a = abc(func)(abc)
  68
  69 #define args(func, args) func args
  70 args(t1, (args(t2, (x, y))))    // t1 (t2 (x, y))
  71
  72 #define ARGS(a) a
  73 #define __ ARGS
  74 int foo __((int x));            // int foo (int x);
  75
  76 /* Concatenations */
  77
  78 #define tail _Test
  79 // Txt_##tail                      // Txt_##_Test
  80
  81 #define z(e,f) e##_##f
  82 z ( abc, xyz )                  // abc_xyz
  83
  84
  85 #define CAT( var ) fix##.var
  86 CAT( a )                        // fix.a
  87
  88 #define CAT3( class, ref ) class##ref::class##ref
  89 CAT3( a, b )                    // ab::ab
  90
  91 #define CAT2( var ) fix##var::fix##var
  92 CAT2( a )                       // fixa::fixa
  93
  94 /* Extremes */
  95
  96 #define MAKE_X( name )  name##_Test
  97 #define MAKE_Y( name )  MAKE_X( name##_Sym )
  98 MAKE_Y( Txt );                  // Txt_Sym_Test;
  99
 100
 101 /* Extensions */
 102
 103 /*
 104 #ident "(c)# Test.txt"
 105
 106 #if #machine(i386)
 107 #   error illegal machine
 108 #endif
 109 char machine[6];
 110 */
 111
 112 /* Last bug */
 113 #define Cfstrcpy                Cstrcpy
 114 #define Cstrcpy( s1, s2 )       strcpy( s1, s2 )
 115
 116 Cfstrcpy(Par1,Par2 )            // blub( Par1, Par2 )