--- TokyoDystopia.xs	2008/08/17 22:24:04	2
+++ TokyoDystopia.xs	2008/08/17 22:54:54	8
@@ -11,16 +11,16 @@
 PROTOTYPES: DISABLE
 
 const char *
-tcidberrmsg(ecode)
+errmsg(ecode)
 	int	ecode
 CODE:
-	RETVAL = tchdberrmsg(ecode);
+	RETVAL = tcidberrmsg(ecode);
 OUTPUT:
 	RETVAL
 
 
 void *
-tcidbnew()
+new()
 PREINIT:
 	TCIDB *db;
 CODE:
@@ -28,3 +28,43 @@
 	RETVAL = db;
 OUTPUT:
 	RETVAL
+
+
+void
+del(db)
+	void *	db
+CODE:
+	tcidbdel(db);
+
+
+int
+ecode(db)
+	void *	db
+CODE:
+	RETVAL = tcidbecode(db);
+OUTPUT:
+	RETVAL
+
+
+int
+tune(db, ernum, etnum, iusiz, opts)
+	void *	db
+	int	ernum
+	int	etnum
+	int	iusiz
+	int	opts
+CODE:
+	RETVAL = tcidbtune(db, ernum, etnum, iusiz, opts);
+OUTPUT:
+	RETVAL
+
+
+int
+setcache(db, icsiz, lcnum)
+	void *	db
+	int	icsiz
+	int	lcnum
+CODE:
+	RETVAL = tcidbsetcache(db, icsiz, lcnum);
+OUTPUT:
+	RETVAL