--- TokyoDystopia.xs	2008/08/18 18:57:26	24
+++ TokyoDystopia.xs	2008/08/18 19:22:30	29
@@ -184,7 +184,7 @@
 	if ( rnum > 0 ) {
 	  av = newAV();
 	  for(i = 0; i < rnum; i++){
-	    av_push(av, newSViv( (int)results[i] ));
+	    av_push(av, newSViv( (int)results[i] ));	// FIXME convert to double?
 	  }
 	  XPUSHs(sv_2mortal(newRV_noinc((SV *)av)));
 	} else {
@@ -202,7 +202,7 @@
 	RETVAL
 
 
-int
+double
 tcidbiternext(idb)
 	void *	idb
 CODE:
@@ -237,3 +237,46 @@
 OUTPUT:
 	RETVAL
 
+
+int
+tcidbcopy(idb, path)
+	void *	idb
+	char *	path
+CODE:
+	RETVAL = tcidbcopy(idb, path);
+OUTPUT:
+	RETVAL
+
+
+void
+tcidbpath(idb)
+	void *	idb
+PREINIT:
+	const char *path;
+PPCODE:
+	path = tcidbpath(idb);
+	if(path){
+	  XPUSHs(sv_2mortal(newSVpv(path, 0)));
+	} else {
+	  XPUSHs((SV *)&PL_sv_undef);
+	}
+	XSRETURN(1);
+
+
+double
+tcidbrnum(idb)
+	void *	idb
+CODE:
+	RETVAL = tcidbrnum(idb);
+OUTPUT:
+	RETVAL
+
+
+double
+tcidbfsiz(idb)
+	void *	idb
+CODE:
+	RETVAL = tcidbfsiz(idb);
+OUTPUT:
+	RETVAL
+