/projects/A++Preprocessor2003/transformationMacros.h

https://bitbucket.org/bathtub/rose · C Header · 255 lines · 135 code · 73 blank · 47 comment · 0 complexity · 3e3e1d1437b2f2318796c9c955e00488 MD5 · raw file 

    

  1. // build include guards
    2. 

  2. #ifndef APP_TRANSFORMATION_MACROS_HEADER_FILE
    3. 

  3. #define APP_TRANSFORMATION_MACROS_HEADER_FILE
    4. 

  4. 

  5. // This file contains the subscript computations required for A++/P++ array transformations
    6. 

  6. 

  7. #include "transformationSubscriptMacros.h"
    8. 

  8. 

  9. // Macros that support the declaration and initialization of specific variables used in different
    10. 

  10. // ways within transformations
    11. 

  11. #include "transformationMacro-length.h"
    12. 

  12. #include "transformationMacro-size.h"
    13. 

  13. #include "transformationMacro-stride.h"
    14. 

  14. 

  15. 

  16. #ifdef ROSE_MACROS_APPEAR_AS_FUNCTIONS
    17. 

  17. // error "USE_ROSE is defined!"
    18. 

  18. 

  19. #if 0
    20. 

  20. #define ARRAY_OPERAND_TRANSFORMATION_DATA(T) \
    21. 

  21. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_STRIDE_ONE_LHS_MACRO         (int dim, T ##Array & X, int Y); \
    22. 

  22. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_STRIDE_ONE_RHS_MACRO         (int dim, T ##Array & X, int Y); \
    23. 

  23. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_UNIFORM_STRIDE_LHS_MACRO     (int dim, T ##Array & X, int Y); \
    24. 

  24. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_UNIFORM_STRIDE_RHS_MACRO     (int dim, T ##Array & X, int Y); \
    25. 

  25. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_VARIABLE_STRIDE_LHS_MACRO    (int dim, T ##Array & X, int Y); \
    26. 

  26. void VARIABLE_DECLARATIONS_UNIFORM_SIZE_VARIABLE_STRIDE_RHS_MACRO    (int dim, T ##Array & X, int Y); \
    27. 

  27. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_STRIDE_ONE_LHS_MACRO        (int dim, T ##Array & X, int Y); \
    28. 

  28. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_STRIDE_ONE_RHS_MACRO        (int dim, T ##Array & X, int Y); \
    29. 

  29. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_UNIFORM_STRIDE_LHS_MACRO    (int dim, T ##Array & X, int Y); \
    30. 

  30. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_UNIFORM_STRIDE_RHS_MACRO    (int dim, T ##Array & X, int Y); \
    31. 

  31. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_VARIABLE_STRIDE_LHS_MACRO   (int dim, T ##Array & X, int Y); \
    32. 

  32. void VARIABLE_DECLARATIONS_VARIABLE_SIZE_VARIABLE_STRIDE_RHS_MACRO   (int dim, T ##Array & X, int Y); \
    33. 

  33. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_STRIDE_ONE_LHS_MACRO       (int dim, T ##Array & X, int Y); \
    34. 

  34. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_STRIDE_ONE_RHS_MACRO       (int dim, T ##Array & X, int Y); \
    35. 

  35. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_UNIFORM_STRIDE_LHS_MACRO   (int dim, T ##Array & X, int Y); \
    36. 

  36. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_UNIFORM_STRIDE_RHS_MACRO   (int dim, T ##Array & X, int Y); \
    37. 

  37. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_VARIABLE_STRIDE_LHS_MACRO  (int dim, T ##Array & X, int Y); \
    38. 

  38. void VARIABLE_INITIALIZATION_UNIFORM_SIZE_VARIABLE_STRIDE_RHS_MACRO  (int dim, T ##Array & X, int Y); \
    39. 

  39. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_STRIDE_ONE_LHS_MACRO      (int dim, T ##Array & X, int Y); \
    40. 

  40. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_STRIDE_ONE_RHS_MACRO      (int dim, T ##Array & X, int Y); \
    41. 

  41. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_UNIFORM_STRIDE_LHS_MACRO  (int dim, T ##Array & X, int Y); \
    42. 

  42. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_UNIFORM_STRIDE_RHS_MACRO  (int dim, T ##Array & X, int Y); \
    43. 

  43. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_VARIABLE_STRIDE_LHS_MACRO (int dim, T ##Array & X, int Y); \
    44. 

  44. void VARIABLE_INITIALIZATION_VARIABLE_SIZE_VARIABLE_STRIDE_RHS_MACRO (int dim, T ##Array & X, int Y);
    45. 

  45. 

  46. // Declare functions for all different A++/P++ types
    47. 

  47. ARRAY_OPERAND_TRANSFORMATION_DATA(int)
    48. 

  48. ARRAY_OPERAND_TRANSFORMATION_DATA(float)
    49. 

  49. ARRAY_OPERAND_TRANSFORMATION_DATA(double)
    50. 

  50. #endif
    51. 

  51. 

  52. #else
    53. 

  53. //error "USE_ROSE is NOT defined!"
    54. 

  54. 

  55. // We have to handle several cases (and we have to have dimension specific versions of each case):
    56. 

  56. // 1) Uniform Size
    57. 

  57. //      a) Stride == 1
    58. 

  58. //      b) Uniform Stride
    59. 

  59. //      c) Variable Stride
    60. 

  60. // 2) Variable Size
    61. 

  61. //      a) Stride == 1
    62. 

  62. //      b) Uniform Stride
    63. 

  63. //      c) Variable Stride
    64. 

  64. 

  65. // ###################################################################
    66. 

  66. //                          UNIFORM SIZE
    67. 

  67. // ###################################################################
    68. 

  68. // include "transformationMacro-uniform_size.h"
    69. 

  69. // ###################################################################
    70. 

  70. //                          VARIABLE SIZE
    71. 

  71. // ###################################################################
    72. 

  72. // include "transformationMacro-variable_size.h"
    73. 

  73. // ###################################################################
    74. 

  74. //                          MACRO INTERFACE
    75. 

  75. // ###################################################################
    76. 

  76. 

  77. // ########## UNIFORM SIZE ##########
    78. 

  78. 

  79. //               ########## unit stride ##########
    80. 

  80. 

  81. // These macros are the ones called by the transformations generated by the a++ preprocessor (generated by ROSE)
    82. 

  82. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_STRIDE_ONE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    83. 

  83.      ARRAY_OPERAND_UNIFORM_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    84. 

  84. 

  85. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_STRIDE_ONE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    86. 

  86. 

  87. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_STRIDE_ONE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    88. 

  88.      ARRAY_OPERAND_UNIFORM_SIZE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    89. 

  89. 

  90. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_STRIDE_ONE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    91. 

  91. 

  92. //               ########## uniform stride ##########
    93. 

  93. 

  94. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_UNIFORM_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    95. 

  95.      ARRAY_OPERAND_UNIFORM_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    96. 

  96.      ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    97. 

  97. 

  98. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_UNIFORM_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    99. 

  99. 

  100. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_UNIFORM_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    101. 

  101.      ARRAY_OPERAND_VARIABLE_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    102. 

  102.      ARRAY_OPERAND_UNIFORM_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    103. 

  103. 

  104. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_UNIFORM_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    105. 

  105. 

  106. 

  107. //               ########## variable stride ##########
    108. 

  108. 

  109. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_VARIABLE_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    110. 

  110.      ARRAY_OPERAND_UNIFORM_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    111. 

  111.      ARRAY_OPERAND_VARIABLE_STRIDE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    112. 

  112. 

  113. #define VARIABLE_DECLARATIONS_UNIFORM_SIZE_VARIABLE_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    114. 

  114.      ARRAY_OPERAND_VARIABLE_STRIDE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    115. 

  115. 

  116. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_VARIABLE_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    117. 

  117.      ARRAY_OPERAND_VARIABLE_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    118. 

  118. 

  119. #define VARIABLE_INITIALIZATION_UNIFORM_SIZE_VARIABLE_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    120. 

  120.      ARRAY_OPERAND_VARIABLE_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    121. 

  121. 

  122. 

  123. // ########## VARIABLE SIZE ##########
    124. 

  124. 

  125. //               ########## unit stride ##########
    126. 

  126. 

  127. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_STRIDE_ONE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    128. 

  128.      ARRAY_OPERAND_VARIABLE_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    129. 

  129. 

  130. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_STRIDE_ONE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    131. 

  131.      ARRAY_OPERAND_VARIABLE_SIZE_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    132. 

  132. 

  133. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_STRIDE_ONE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    134. 

  134.      ARRAY_OPERAND_STRIDE_ONE_INITIALIZATION_MACRO_D## DIMENSION()
    135. 

  135. 

  136. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_STRIDE_ONE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    137. 

  137.      ARRAY_OPERAND_VARIABLE_SIZE_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    138. 

  138. 

  139. 

  140. //               ########## uniform stride ##########
    141. 

  141. 

  142. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_UNIFORM_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    143. 

  143.      ARRAY_OPERAND_VARIABLE_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    144. 

  144. 

  145. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_UNIFORM_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    146. 

  146. 

  147. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_UNIFORM_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    148. 

  148.      ARRAY_OPERAND_UNIFORM_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    149. 

  149. 

  150. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_UNIFORM_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    151. 

  151. 

  152. 

  153. //               ########## variable stride ##########
    154. 

  154. 

  155. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_VARIABLE_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    156. 

  156.      ARRAY_OPERAND_VARIABLE_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    157. 

  157.      ARRAY_OPERAND_VARIABLE_STRIDE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    158. 

  158. 

  159. #define VARIABLE_DECLARATIONS_VARIABLE_SIZE_VARIABLE_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    160. 

  160.      ARRAY_OPERAND_VARIABLE_SIZE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    161. 

  161.      ARRAY_OPERAND_VARIABLE_STRIDE_DECLARATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    162. 

  162. 

  163. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_VARIABLE_STRIDE_LHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    164. 

  164.      ARRAY_OPERAND_VARIABLE_SIZE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER) \
    165. 

  165.      ARRAY_OPERAND_VARIABLE_STRIDE_INITIALIZATION_MACRO_D## DIMENSION(VARIABLE_NAME,VARIABLE_IDENTIFIER)
    166. 

  166. 

  167. #define VARIABLE_INITIALIZATION_VARIABLE_SIZE_VARIABLE_STRIDE_RHS_MACRO(DIMENSION,VARIABLE_NAME,VARIABLE_IDENTIFIER)
    168. 

  168. 

  169. #endif
    170. 

  170. 

  171. // Used for both internally generated intermediate code and final generated code
    172. 

  172. // (since the loop nests must have there variables defined so that the intermediate
    173. 

  173. // code can compile).
    174. 

  174. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D1() \
    175. 

  175.    int _length1 = 0;
    176. 

  176. 

  177. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D2() \
    178. 

  178.    int _length1 = 0, _length2 = 0;
    179. 

  179. 

  180. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D3() \
    181. 

  181.    int _length1 = 0,_length2 = 0,_length3 = 0;
    182. 

  182. 

  183. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D4() \
    184. 

  184.    int _length1 = 0,_length2 = 0,_length3 = 0,_length4 = 0;
    185. 

  185. 

  186. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D5() \
    187. 

  187.    int _length1 = 0,_length2 = 0,_length3 = 0,_length4 = 0,_length5 = 0;
    188. 

  188. 

  189. #define ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D6() \
    190. 

  190.    int _length1 = 0,_length2 = 0,_length3 = 0,_length4 = 0,_length5 = 0,_length6 = 0;
    191. 

  191. 

  192. // These macros define the loop variables which are required to be seen
    193. 

  193. // when we compile both the loop nest to build the AST fragment and the
    194. 

  194. // final application code.
    195. 

  195. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D1() \
    196. 

  196.    int _1; \
    197. 

  197.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D1()
    198. 

  198. 

  199. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D2() \
    200. 

  200.    int _1,_2; \
    201. 

  201.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D2()
    202. 

  202. 

  203. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D3() \
    204. 

  204.    int _1,_2,_3; \
    205. 

  205.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D3()
    206. 

  206. 

  207. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D4() \
    208. 

  208.    int _1,_2,_3,_4; \
    209. 

  209.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D4()
    210. 

  210. 

  211. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D5() \
    212. 

  212.    int _1,_2,_3,_4,_5; \
    213. 

  213.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D5()
    214. 

  214. 

  215. #define LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D6() \
    216. 

  216.    int _1,_2,_3,_4,_5,_6; \
    217. 

  217.    ARRAY_TRANSFORMATION_LENGTH_DECLARATION_MACRO_D6()
    218. 

  218. 

  219. // The case of uniform stride (across all operands) is optimized in the
    220. 

  220. // generated loop nest to increment by a fixed stride (across all operands)
    221. 

  221. // This requires the support of a macro that declares the stride# variables
    222. 

  222. // so that the generated loop nest can be compiled to form the AST fragment.
    223. 

  223. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D1() \
    224. 

  224.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D1() \
    225. 

  225.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D1()
    226. 

  226. 

  227. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D2() \
    228. 

  228.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D2() \
    229. 

  229.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D2()
    230. 

  230. 

  231. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D3() \
    232. 

  232.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D3() \
    233. 

  233.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D3()
    234. 

  234. 

  235. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D4() \
    236. 

  236.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D4() \
    237. 

  237.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D4()
    238. 

  238. 

  239. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D5() \
    240. 

  240.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D5() \
    241. 

  241.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D5()
    242. 

  242. 

  243. #define LOOP_INDEX_VARIABLES_UNIFORM_STRIDE_DECLARATION_MACRO_D6() \
    244. 

  244.    LOOP_INDEX_VARIABLES_DECLARATION_MACRO_D6() \
    245. 

  245.    ARRAY_OPERAND_UNIFORM_STRIDE_DECLARATION_MACRO_D6()
    246. 

  246. 

  247. 

  248. // endif for APP_TRANSFORMATION_MACROS_HEADER_FILE (include guard)
    249. 

  249. #endif
    250.