hds: hdsFind should return an int

To be consistent with every other HDS C routine.
Starlink · Oct 31, 2014 · 2c4e543 · 2c4e543
1 parent 5b73a01
commit 2c4e543
Show file tree

Hide file tree

Showing 5 changed files with 9 additions and 6 deletions.
diff --git a/libext/hds-v5 b/libext/hds-v5
diff --git a/libraries/hds-v4/hds.h b/libraries/hds-v4/hds.h
@@ -1109,7 +1109,8 @@ hdsClose(HDSLoc **locator, int *status);
 /*===================================================================*/
 /* hdsFind - Find an object (Fortran routine, requires hdsf library) */
 /*===================================================================*/
-void
+
+int
 hdsFind(const HDSLoc *locator1, const char *name, const char *mode, HDSLoc **locator2, int *status);
 
 

diff --git a/libraries/hds-v4/hds_v4.h b/libraries/hds-v4/hds_v4.h
@@ -1106,7 +1106,8 @@ hdsClose_v4(HDSLoc **locator, int *status);
 /*===================================================================*/
 /* hdsFind - Find an object (Fortran routine, requires hdsf library) */
 /*===================================================================*/
-void
+
+int
 hdsFind_v4(const HDSLoc *locator1, const char *name, const char *mode, HDSLoc **locator2, int *status);
 
 

diff --git a/libraries/hds/hds.h b/libraries/hds/hds.h
@@ -1106,7 +1106,8 @@ hdsClose(HDSLoc **locator, int *status);
 /*===================================================================*/
 /* hdsFind - Find an object (Fortran routine, requires hdsf library) */
 /*===================================================================*/
-void
+
+int
 hdsFind(const HDSLoc *locator1, const char *name, const char *mode, HDSLoc **locator2, int *status);
 
 

diff --git a/libraries/hds/hdsFind.c b/libraries/hds/hdsFind.c
@@ -73,7 +73,7 @@ F77_SUBROUTINE( hds_find )( CHARACTER( floc1 ),
  *     status = global status
  *
  */
-void hdsFind( const HDSLoc *loc1, const char *name, const char *mode,
+int hdsFind( const HDSLoc *loc1, const char *name, const char *mode,
               HDSLoc **loc2, int *status )
 {
     DECLARE_CHARACTER(floc1,DAT__SZLOC);
@@ -103,5 +103,5 @@ void hdsFind( const HDSLoc *loc1, const char *name, const char *mode,
     F77_FREE_CHARACTER( fmode );
     HDS_IMPORT_FLOCATOR( floc2, loc2, status );
     F77_IMPORT_INTEGER( fstatus, *status );
-    return;
+    return *status;
 }