Go to the documentation of this file.
70 # define OSL_DEBUG 0 // 1 for debug mode, 0 otherwise.
72 # define OSL_URI_SCOP "OpenScop"
74 # define OSL_PRECISION_ENV "OSL_PRECISION"
75 # define OSL_PRECISION_ENV_SP "32"
76 # define OSL_PRECISION_ENV_DP "64"
77 # define OSL_PRECISION_ENV_MP "0"
78 # define OSL_PRECISION_SP 32
79 # define OSL_PRECISION_DP 64
80 # define OSL_PRECISION_MP 0
82 # define OSL_FMT_SP "%4ld"
83 # define OSL_FMT_DP "%4lld"
84 # define OSL_FMT_MP "%4s"
85 # define OSL_FMT_LENGTH 4 // Should be the same as FMT_*P.
86 # define OSL_FMT_TXT_SP "%ld"
87 # define OSL_FMT_TXT_DP "%lld"
88 # define OSL_FMT_TXT_MP "%s"
91 # define OSL_BACKEND_C 0
92 # define OSL_BACKEND_FORTRAN 1
93 # define OSL_UNDEFINED -1
94 # define OSL_MAX_STRING 2048
95 # define OSL_MIN_STRING 100
96 # define OSL_MAX_ARRAYS 128
98 # define OSL_TYPE_GENERIC 0
99 # define OSL_TYPE_STRING 1
100 # define OSL_TYPE_CONTEXT 2
101 # define OSL_TYPE_DOMAIN 3
102 # define OSL_TYPE_SCATTERING 4
103 # define OSL_TYPE_ACCESS 5
104 # define OSL_TYPE_READ 6
105 # define OSL_TYPE_WRITE 7
106 # define OSL_TYPE_MAY_WRITE 8
108 # define OSL_FAKE_ARRAY "fakearray"
110 # define OSL_SYMBOL_TYPE_ITERATOR 1
111 # define OSL_SYMBOL_TYPE_PARAMETER 2
112 # define OSL_SYMBOL_TYPE_ARRAY 3
113 # define OSL_SYMBOL_TYPE_FUNCTION 4
115 # define OSL_STRING_UNDEFINED "UNDEFINED"
116 # define OSL_STRING_CONTEXT "CONTEXT"
117 # define OSL_STRING_DOMAIN "DOMAIN"
118 # define OSL_STRING_SCATTERING "SCATTERING"
119 # define OSL_STRING_READ "READ"
120 # define OSL_STRING_WRITE "WRITE"
121 # define OSL_STRING_MAY_WRITE "MAY_WRITE"
127 # define OSL_coucou(n) \
130 fprintf(stderr,"[osl] Coucou %d (%s).\n", i, __func__); \
133 # define OSL_debug(msg) \
136 fprintf(stderr,"[osl] Debug: " msg " (%s).\n", __func__); \
139 # define OSL_info(msg) \
141 fprintf(stderr,"[osl] Info: " msg " (%s).\n", __func__); \
144 # define OSL_warning(msg) \
146 fprintf(stderr,"[osl] Warning: " msg " (%s).\n", __func__); \
149 # define OSL_error(msg) \
151 fprintf(stderr,"[osl] Error: " msg " (%s).\n", __func__); \
155 # define OSL_overflow(msg) OSL_error(msg)
157 # define OSL_malloc(ptr, type, size) \
159 if (((ptr) = (type)malloc(size)) == NULL) \
160 OSL_error("memory overflow"); \
163 # define OSL_realloc(ptr, type, size) \
165 if (((ptr) = (type)realloc(ptr, size)) == NULL) \
166 OSL_error("memory overflow"); \
169 # define OSL_strdup(destination, source) \
171 if (source != NULL) { \
172 if (((destination) = osl_util_strdup(source)) == NULL) \
173 OSL_error("memory overflow"); \
176 destination = NULL; \
177 OSL_warning("strdup of a NULL string"); \
181 # define OSL_max(x,y) ((x) > (y)? (x) : (y))
183 # define OSL_min(x,y) ((x) < (y)? (x) : (y))