From 0cde4a6e341fdada89b8d7ab363e766e464be879 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@f75ba9e5-694f-0410-ac2c-87ea7ce7132b>
Date: Tue, 10 Feb 2004 14:41:10 +0000
Subject: Make the header file work with both C and Fortran.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEvolve/LegoExcision/trunk@40 f75ba9e5-694f-0410-ac2c-87ea7ce7132b
---
 src/maskvalues.h | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/src/maskvalues.h b/src/maskvalues.h
index c9744e8..bbaa95b 100644
--- a/src/maskvalues.h
+++ b/src/maskvalues.h
@@ -1,8 +1,19 @@
-/* -*-f90-*- */
 /* $Header$ */
 
 /* Values of the mask */
 
+#ifdef CCODE
+
+#define MASK_EXCISED  0.0
+#define MASK_BOUNDARY 0.5
+#define MASK_ACTIVE   1.0
+
+#endif
+
+#ifdef FCODE
+
 #define MASK_EXCISED  0.0D0
 #define MASK_BOUNDARY 0.5D0
 #define MASK_ACTIVE   1.0D0
+
+#endif
-- 
cgit v1.2.3