--- TokyoDystopia.xs	2008/08/18 18:57:26	24
+++ TokyoDystopia.xs	2008/08/18 19:01:00	25
@@ -237,3 +237,13 @@
 OUTPUT:
 	RETVAL
 
+
+int
+tcidbcopy(idb, path)
+	void *	idb
+	char *	path
+CODE:
+	RETVAL = tcidbcopy(idb, path);
+OUTPUT:
+	RETVAL
+