my-lib.c 1.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  1. /* GCC-StarPU
  2. Copyright (C) 2011 Institut National de Recherche en Informatique et Automatique
  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. /* Example library of tasks. */
  14. /* (instructions compile) */
  15. #include <my-lib.h>
  16. /* Task implementations: one is `static', one is global. The codelet
  17. wrapper, codelet, and task body should be instantiated in this file. */
  18. static void my_task_opencl (char, const char *, float *, int)
  19. __attribute__ ((task_implementation ("opencl", my_task)));
  20. void
  21. my_task_cpu (char a, const char *p, float *q, int b)
  22. {
  23. int i;
  24. for (i = 0; i < b; i++)
  25. *q = *p + a;
  26. }
  27. static void
  28. my_task_opencl (char a, const char *p, float *q, int b)
  29. {
  30. int i;
  31. for (i = 0; i < b; i++)
  32. *q = *p + a;
  33. }