From 21ac8a7f030e7b98b29e82cdcc9cc87196788be2 Mon Sep 17 00:00:00 2001
From: Quincey Koziol <koziol@hdfgroup.org>
Date: Wed, 29 Apr 1998 10:57:02 -0500
Subject: [PATCH] [svn-r381] Added "rank=0" for a scalar variable
 initialization.

---
 src/H5S.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/H5S.c b/src/H5S.c
index dd6ff5ce82..771ccba193 100644
--- a/src/H5S.c
+++ b/src/H5S.c
@@ -155,6 +155,7 @@ H5Screate_simple(int rank, const hsize_t *dims, const hsize_t *maxdims)
     else /* rank==0, for scalar data space */
       {
         ds->type = H5S_SCALAR;
+        ds->u.simple.rank = 0;
       } /* end else */
     
     /* Register the new data space and get an ID for it */