Move CROAK_NULL and CROAK_NULL_SELF macros to util/util.h

These macros will be used in Authen::Kerberos as well.

diff --git a/lib/Authen/Kerberos/Kadmin.xs b/lib/Authen/Kerberos/Kadmin.xs
index 23dbef3de27e590e7998bf85ab543228ca77498d..41b802e5a79f9227023de6f6a7845766a4a881bc 100644 (file)
--- a/lib/Authen/Kerberos/Kadmin.xs
+++ b/lib/Authen/Kerberos/Kadmin.xs
@@ -52,14 +52,6 @@ typedef struct {
     bool quality;
 } *Authen__Kerberos__Kadmin;
 
-/* Used to check that an object argument to a function is not NULL. */
-#define CROAK_NULL(o, t, f)                     \
-    do {                                        \
-        if ((o) == NULL)                        \
-            croak(t " object is undef in " f);  \
-    } while (0);
-#define CROAK_NULL_SELF(o, t, f) CROAK_NULL((o), t, t "::" f)
-
 
 /* XS code below this point. */
 

diff --git a/util/util.h b/util/util.h
index 0312fdbed28d6e479f97bda961b87ebad687388d..aa9ac6c6571722242805f59194928c7fd1fd8447 100644 (file)
--- a/util/util.h
+++ b/util/util.h
@@ -35,6 +35,14 @@
 #include <krb5.h>               /* krb5_contxt, krb5_error_code */
 #include <perl.h>               /* bool */
 
+/* Used to check that an object argument to a function is not NULL. */
+#define CROAK_NULL(o, t, f)                     \
+    do {                                        \
+        if ((o) == NULL)                        \
+            croak(t " object is undef in " f);  \
+    } while (0);
+#define CROAK_NULL_SELF(o, t, f) CROAK_NULL((o), t, t "::" f)
+
 BEGIN_DECLS
 
 /* Default to a hidden visibility for all util functions. */