--- TokyoDystopia.xs	2008/08/17 23:53:11	10
+++ TokyoDystopia.xs	2008/08/18 17:26:01	15
@@ -91,3 +91,36 @@
 	RETVAL
 
 
+int
+tcidbclose(idb)
+	void *	idb
+CODE:
+	RETVAL = tcidbclose(idb);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbput(idb, id, val)
+	void *	idb
+	int	id
+	SV *	val
+PREINIT:
+	STRLEN vsiz;
+	const char *vbuf;
+CODE:
+	vbuf = SvPV(val, vsiz);
+	RETVAL = tcidbput(idb, id, vbuf);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbout(idb, id)
+	void *	idb
+	int	id
+CODE:
+	RETVAL = tcidbout(idb, id);
+OUTPUT:
+	RETVAL
+