file.c 1.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344
  1. /* StarPU --- Runtime system for heterogeneous multicore architectures.
  2. *
  3. * Copyright (C) 2010 Université de Bordeaux 1
  4. * Copyright (C) 2010 Centre National de la Recherche Scientifique
  5. *
  6. * StarPU is free software; you can redistribute it and/or modify
  7. * it under the terms of the GNU Lesser General Public License as published by
  8. * the Free Software Foundation; either version 2.1 of the License, or (at
  9. * your option) any later version.
  10. *
  11. * StarPU is distributed in the hope that it will be useful, but
  12. * WITHOUT ANY WARRANTY; without even the implied warranty of
  13. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  14. *
  15. * See the GNU Lesser General Public License in COPYING.LGPL for more details.
  16. */
  17. #include <starpu.h>
  18. #include <common/utils.h>
  19. void _starpu_drop_comments(FILE *f)
  20. {
  21. while(1) {
  22. int c = getc(f);
  23. switch (c) {
  24. case '#':
  25. {
  26. char s[128];
  27. char *ret;
  28. do {
  29. ret = fgets(s, sizeof(s), f);
  30. } while (ret && (!strchr(s, '\n')));
  31. }
  32. case '\n':
  33. continue;
  34. default:
  35. ungetc(c, f);
  36. return;
  37. }
  38. }
  39. }