--- TokyoDystopia.xs	2008/08/17 23:57:02	11
+++ TokyoDystopia.xs	2008/08/18 17:26:01	15
@@ -99,3 +99,28 @@
 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
+