From acb666d768de549314fc847d7c19ae5ac7295050 Mon Sep 17 00:00:00 2001
From: Ed Hartnett <edwardjameshartnett@gmail.com>
Date: Sat, 6 Jul 2019 13:34:04 -0600
Subject: [PATCH] more PIO_NCINT functions

---
 src/ncint/ncintdispatch.c | 23 ++++++++++++++++++++++-
 src/ncint/ncintdispatch.h |  4 ++++
 2 files changed, 26 insertions(+), 1 deletion(-)

diff --git a/src/ncint/ncintdispatch.c b/src/ncint/ncintdispatch.c
index e5ec53cea6c..b4d7d4a4026 100644
--- a/src/ncint/ncintdispatch.c
+++ b/src/ncint/ncintdispatch.c
@@ -74,7 +74,7 @@ NC_Dispatch NCINT_dispatcher = {
     PIO_NCINT_def_var_fill,
 
     NC4_show_metadata,
-    NC4_inq_unlimdims,
+    PIO_NCINT_inq_unlimdims,
 
     NC4_inq_ncid,
     NC4_inq_grps,
@@ -782,3 +782,24 @@ PIO_NCINT_def_var_fill(int ncid, int varid, int no_fill, const void *fill_value)
 {
     return PIOc_def_var_fill(ncid, varid, no_fill, fill_value);
 }
+
+/**
+ * @internal Returns an array of unlimited dimension ids.The user can
+ * get the number of unlimited dimensions by first calling this with
+ * NULL for the second pointer.
+ *
+ * @param ncid File and group ID.
+ * @param nunlimdimsp Pointer that gets the number of unlimited
+ * dimensions. Ignored if NULL.
+ * @param unlimdimidsp Pointer that gets arrray of unlimited dimension
+ * ID. Ignored if NULL.
+ *
+ * @return ::NC_NOERR No error.
+ * @return ::NC_EBADID Bad ncid.
+ * @author Ed Hartnett, Dennis Heimbigner
+ */
+int
+PIO_NCINT_inq_unlimdims(int ncid, int *nunlimdimsp, int *unlimdimidsp)
+{
+    return PIOc_inq_unlimdims(ncid, nunlimdimsp, unlimdimidsp);
+}
diff --git a/src/ncint/ncintdispatch.h b/src/ncint/ncintdispatch.h
index 0c722fdbce6..c6556aa01c8 100644
--- a/src/ncint/ncintdispatch.h
+++ b/src/ncint/ncintdispatch.h
@@ -156,6 +156,10 @@ extern "C" {
     extern int
     PIO_NCINT_def_var_fill(int ncid, int varid, int no_fill, const void *fill_value);
 
+    extern int
+    PIO_NCINT_inq_unlimdims(int ncid, int *nunlimdimsp, int *unlimdimidsp);
+
+
 
 #if defined(__cplusplus)
 }