. * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. * */ if ( !defined ('PATH_THIRDPARTY') ) { require_once( $_SERVER['PWD']. '/test/bootstrap/unit.php'); } require_once( PATH_THIRDPARTY . 'lime/lime.php'); define ( 'G_ENVIRONMENT', G_TEST_ENV); require_once( PATH_CORE . 'config' . PATH_SEP . 'environments.php'); global $G_ENVIRONMENTS; if ( isset ( $G_ENVIRONMENTS ) ) { $dbfile = $G_ENVIRONMENTS[ G_TEST_ENV ][ 'dbfile']; if ( !file_exists ( $dbfile ) ) { printf("%s \n", pakeColor::colorize( "dbfile $dbfile doesn't exist for environment " . G_ENVIRONMENT , 'ERROR')); exit (200); } else include ( $dbfile ); } else exit (201); G::LoadThirdParty('pear/json','class.json'); G::LoadThirdParty('smarty/libs','Smarty.class'); G::LoadSystem ( 'xmlform'); G::LoadSystem ( 'xmlDocument'); G::LoadSystem ( 'form'); G::LoadSystem ( 'tree'); $t = new lime_test(7, new lime_output_color()); $obj = new Tree( array ('name' => 'value' ) ); $method = array ( ); $testItems = 0; $class_methods = get_class_methods('Tree'); foreach ($class_methods as $method_name) { $methods[ $testItems ] = $method_name; $testItems++; } $t->diag('class Tree' ); $t->is( $testItems , 14, "class Tree " . $testItems . " methods." ); $t->isa_ok( $obj , 'Tree', 'class Tree created'); $t->can_ok( $obj, 'addChild', 'addChild()'); $t->can_ok( $obj, 'printPlus', 'printPlus()'); $t->can_ok( $obj, 'printContent', 'printContent()'); $t->can_ok( $obj, 'render', 'render()'); $t->todo( 'review all pendings in this class');