1 files changed, 19 insertions, 0 deletions
diff --git a/fortran/test/t.c b/fortran/test/t.c
index cb71fd2..9eede1a 100644
--- a/fortran/test/t.c
+++ b/fortran/test/t.c
@@ -128,3 +128,22 @@ nh5_exit_c(int_f *status)
     HDexit((int)*status);
 }   /* h5_exit_c */
 
+
+/*----------------------------------------------------------------------------
+ * Name:        h5_group_revision_c
+ * Purpose:     Checks if H5_GROUP_REVISION variable defined
+ * Inputs:      
+ * Returns:     1 if defines, 0 otherwise
+ * Programmer:  Elena Pourmal
+ *              Saturday, May 13, 2006
+ * Modifications:
+ *---------------------------------------------------------------------------*/
+int_f
+nh5_group_revision_c()
+{
+    int_f ret =0;
+#ifdef H5_GROUP_REVISION 
+       ret = 1;
+#endif
+    return ret;
+}   /* h5_group_revision_c */