OpenSolaris Launch

1 files changed, 28 insertions, 0 deletions

diff --git a/usr/src/lib/krb5/dyn/dyn_paranoid.c b/usr/src/lib/krb5/dyn/dyn_paranoid.c
new file mode 100644
index 0000000000..fd72cbe7d1
--- /dev/null
+++ b/usr/src/lib/krb5/dyn/dyn_paranoid.c
@@ -0,0 +1,28 @@
+#pragma ident	"%Z%%M%	%I%	%E% SMI"
+
+/*
+ * This file is part of libdyn.a, the C Dynamic Object library.  It
+ * contains the source code for the function DynDebug().
+ *
+ * There are no restrictions on this code; however, if you make any
+ * changes, I request that you document them so that I do not get
+ * credit or blame for your modifications.
+ *
+ * Written by Barr3y Jaspan, Student Information Processing Board (SIPB)
+ * and MIT-Project Athena, 1989.
+ */
+
+#include <stdio.h>
+
+#include "dynP.h"
+
+int DynParanoid(obj, state)
+   DynObjectP obj;
+   int state;
+{
+     obj->paranoid = state;
+
+     if (obj->debug)
+	  fprintf(stderr, "dyn: paranoid: Paranoia set to %d.\n", state);
+     return DYN_OK;
+}