From 340c3a72895b990f21fcbb55319891ada52e8d4c Mon Sep 17 00:00:00 2001
From: Daniel Silverstone <dsilvers@digital-scurf.org>
Date: Sat, 7 Jul 2012 17:30:25 +0100
Subject: DOMTSHandler.pm: Add casts for method calls, enable two more tests

---
 test/DOMTSHandler.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'test/DOMTSHandler.pm')

diff --git a/test/DOMTSHandler.pm b/test/DOMTSHandler.pm
index 6545332..65efff3 100644
--- a/test/DOMTSHandler.pm
+++ b/test/DOMTSHandler.pm
@@ -665,9 +665,9 @@ sub generate_method {
 	}
 
 	$method = to_cmethod($ats{'interface'}, $en);
-
+        my $cast = to_attribute_cast($ats{'interface'});
 	my $ns = $dd->find("parameters/param", $node);
-	my $params = "$ats{'obj'}";
+	my $params = "${cast}$ats{'obj'}";
 	for ($count = 1; $count <= $ns->size; $count++) {
 		my $n = $ns->get_node($count);
 		my $p = $n->getAttribute("name");
-- 
cgit v1.2.3