12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061 |
- /* GCC-StarPU
- Copyright (C) 2011, 2012 Institut National de Recherche en Informatique et Automatique
- GCC-StarPU is free software: you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation, either version 3 of the License, or
- (at your option) any later version.
- GCC-StarPU is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with GCC-StarPU. If not, see <http://www.gnu.org/licenses/>. */
- /* Test error handling for `#pragma starpu register ...'. */
- #undef NDEBUG
- extern void *void_pointer;
- int
- main (int argc, char *argv[])
- {
- #pragma starpu initialize
- #pragma starpu register /* (error "parse error") */
- #pragma starpu register argv 234 junk here /* (error "junk after") *//* (error "unbound") *//* (error "unbound") */
- static int x[123] __attribute__ ((unused));
- #pragma starpu register x 234 /* (note "can be omitted") *//* (error "differs from actual size") */
- size_t x_size __attribute__ ((unused)) = sizeof x / sizeof x[0];
- #pragma starpu register x x_size /* (note "can be omitted") *//* (error "known at compile-time") */
- #pragma starpu register does_not_exit 123 /* (error "unbound variable") */
- #pragma starpu register argv does_not_exit /* (error "unbound variable") */
- #pragma starpu register argv /* (error "cannot determine size") */
- #pragma starpu register &argv[2] /* (error "cannot determine size") */
- #pragma starpu register &x[2] /* (error "cannot determine size") */
- #pragma starpu register argc /* (error "neither a pointer nor an array") */
- #pragma starpu register argv[2][3] 3 /* (error "neither a pointer nor an array") */
- #pragma starpu register argv[does_not_exist] 3 /* (error "unbound variable") */
- char **p = argv;
- size_t ps = argc;
- #pragma starpu register p ps /* No unused variable warning, please! */
- #pragma starpu register void_pointer 123 /* (error "not allowed") */
- #pragma starpu register "hello" /* (error "invalid .*argument") */
- return EXIT_SUCCESS;
- }
|