summaryrefslogtreecommitdiff
path: root/tools/swig/test/Fortran.h
diff options
context:
space:
mode:
Diffstat (limited to 'tools/swig/test/Fortran.h')
-rw-r--r--tools/swig/test/Fortran.h21
1 files changed, 21 insertions, 0 deletions
diff --git a/tools/swig/test/Fortran.h b/tools/swig/test/Fortran.h
new file mode 100644
index 000000000..c243bb50f
--- /dev/null
+++ b/tools/swig/test/Fortran.h
@@ -0,0 +1,21 @@
+#ifndef FORTRAN_H
+#define FORTRAN_H
+
+#define TEST_FUNC_PROTOS(TYPE, SNAME) \
+\
+TYPE SNAME ## SecondElement( TYPE * matrix, int rows, int cols); \
+
+TEST_FUNC_PROTOS(signed char , schar )
+TEST_FUNC_PROTOS(unsigned char , uchar )
+TEST_FUNC_PROTOS(short , short )
+TEST_FUNC_PROTOS(unsigned short , ushort )
+TEST_FUNC_PROTOS(int , int )
+TEST_FUNC_PROTOS(unsigned int , uint )
+TEST_FUNC_PROTOS(long , long )
+TEST_FUNC_PROTOS(unsigned long , ulong )
+TEST_FUNC_PROTOS(long long , longLong )
+TEST_FUNC_PROTOS(unsigned long long, ulongLong)
+TEST_FUNC_PROTOS(float , float )
+TEST_FUNC_PROTOS(double , double )
+
+#endif