1 files changed, 18 insertions, 0 deletions
diff --git a/src/interfaces/libpgtcl/pgtclId.h b/src/interfaces/libpgtcl/pgtclId.h
new file mode 100644
index 00000000000..af9839ceb1e
--- /dev/null
+++ b/src/interfaces/libpgtcl/pgtclId.h
@@ -0,0 +1,18 @@
+/*-------------------------------------------------------------------------
+ *
+ * pgtclId.h--
+ *    useful routines to convert between strings and pointers
+ *  Needed because everything in tcl is a string, but often, pointers
+ *  to data structures are needed.
+ *    
+ *
+ * Copyright (c) 1994, Regents of the University of California
+ *
+ * $Id: pgtclId.h,v 1.1.1.1 1996/07/09 06:22:16 scrappy Exp $
+ *
+ *-------------------------------------------------------------------------
+ */
+
+extern void PgSetId(char *id, void *ptr);
+extern void* PgGetId(char *id);
+extern int PgValidId(char* id);