diff options
Diffstat (limited to 'tests/it_xml.t')
-rwxr-xr-x | tests/it_xml.t | 66 |
1 files changed, 0 insertions, 66 deletions
diff --git a/tests/it_xml.t b/tests/it_xml.t deleted file mode 100755 index 85f16c8..0000000 --- a/tests/it_xml.t +++ /dev/null @@ -1,66 +0,0 @@ -#!/www/server/bin/php -qC -<?php -# -# $Id$ -# -# Tests for itools/xml.class - -require 'searchlib/search_test.class'; - -function match($xmldata, $expected, $name, $prefix = "") -{ - $classname = $prefix ? ($prefix . "_xml") : "it_xml"; - $varname = $prefix . "foo"; - $xml = new $classname("<root>$xmldata</root>"); - - is( - preg_replace('/[#\s]+/', " ", search_test::dump($xml->$varname)), - $expected, - $name, - ); -} - -match( - '<foo />', - 'class foo { }', - 'empty tag' -); - -#match( -# '<foo /><foo />', -# 'array ( 0 => class foo { }, 1 => class foo { }, )', -# 'multiple empty tags converted to array' -#); - -match( - '<foo title="Zürich">Stüssihofstadt</foo>', - 'class foo { var $attr = array( \'title\' => \'Zürich\' ); var $val = \'Stüssihofstadt\'; }', - 'simple tag with latin1 content and attribute' -); - -# Test inheritance -class my_xml extends it_xml -{ - -function my_xml($xmldata) -{ - parent::it_xml($xmldata); - - # Code which should be executed in root and only there - $this->qux = new it_xml; - $this->qux->val = "qux"; - - if (is_object($this->myfoo)) - $this->myfoo->inheritbaseclass = is_a($this->myfoo, "my_xml"); -} - -} - -match( - '<myfoo />', - 'class myfoo { var $inheritbaseclass = false; }', - 'Inheritance and constructor (critical for e.g. tel_xmlentry)', - 'my' -); - -?> |