Kill f2c. Finally. I hope.

[simgrid.git] / include / smpi / smpif.h.in

diff --git a/include/smpi/smpif.h.in b/include/smpi/smpif.h.in
deleted file mode 100644 (file)
index a61dabc..0000000
--- a/include/smpi/smpif.h.in
+++ /dev/null
@@ -1,49 +0,0 @@
-/* Copyright (c) 2007-2014. The SimGrid Team.
- * All rights reserved.                                                     */
-
-/* This program is free software; you can redistribute it and/or modify it
- * under the terms of the license (GNU LGPL) which comes with this package. */
-
-#ifndef SMPIF_H
-#define SMPIF_H
-
-#cmakedefine SMPI_F2C @SMPI_F2C@
-
-#ifdef SMPI_F2C
-
-#include <xbt/misc.h>
-#include <smpi/smpi.h>
-/* those are defined in f2c.h */
-#undef min
-#undef max
-#include <f2c.h>
-
-XBT_PUBLIC_DATA(__thread int) smpi_current_rank;
-
-XBT_PUBLIC(int) smpi_process_argc(void);
-XBT_PUBLIC(int) smpi_process_getarg(integer* index, char* dst, ftnlen len);
-
-#define smpi_sample_local__(pi,pt) \
-   { \
-      if(smpi_sample_1(0, __FILE__, __LINE__, *pi, *pt)) { \
-         smpi_sample_3(0, __FILE__, __LINE__); \
-      } \
-      if(!smpi_sample_2(0, __FILE__, __LINE__)) { \
-         continue; \
-      } \
-   }
-
-#define smpi_sample_global__(pi,pt) \
-   { \
-      if(smpi_sample_1(1, __FILE__, __LINE__, *pi, *pt)) { \
-         smpi_sample_3(1, __FILE__, __LINE__); \
-      } \
-      if(!smpi_sample_2(1, __FILE__, __LINE__)) { \
-         continue; \
-      } \
-   }
-
-
-#endif
-
-#endif // SMPI_F2C