--- deliantra/server/plugins/cfperl/typemap	2006/07/15 21:10:04	1.4
+++ deliantra/server/plugins/cfperl/typemap	2006/08/13 17:16:02	1.5
@@ -1,4 +1,5 @@
 val64		T_VAL64
+uint64		T_VAL64
 
 object *	T_OBJECT
 partylist *	T_PARTY
@@ -14,7 +15,7 @@
 INPUT
 
 T_VAL64
-	$var = (val64)SvVAL64 ($arg);
+	$var = ($type)SvVAL64 ($arg);
 
 T_OBJECT
 	$var = (object *)SvPTR ($arg, \"cf::object\");