utils.c 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. /* GCC-StarPU
  2. Copyright (C) 2012 Inria
  3. GCC-StarPU is free software: you can redistribute it and/or modify
  4. it under the terms of the GNU General Public License as published by
  5. the Free Software Foundation, either version 3 of the License, or
  6. (at your option) any later version.
  7. GCC-StarPU is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  10. GNU General Public License for more details.
  11. You should have received a copy of the GNU General Public License
  12. along with GCC-StarPU. If not, see <http://www.gnu.org/licenses/>. */
  13. #include <starpu-gcc-config.h>
  14. #include <gcc-plugin.h>
  15. #include <plugin-version.h>
  16. #include <plugin.h>
  17. #include <cpplib.h>
  18. #include <tree.h>
  19. #include <gimple.h>
  20. #include <utils.h>
  21. /* Whether to enable verbose output. */
  22. bool verbose_output_p = false;
  23. /* Name of the `task' attribute. */
  24. const char task_attribute_name[] = "task";
  25. /* Return true if DECL is a task. */
  26. bool
  27. task_p (const_tree decl)
  28. {
  29. return (TREE_CODE (decl) == FUNCTION_DECL &&
  30. lookup_attribute (task_attribute_name,
  31. DECL_ATTRIBUTES (decl)) != NULL_TREE);
  32. }