Example #1
0
void pretty_print_individual ( individual *ind, FILE *f )
{
     int j;

     for ( j = 0; j < tree_count; ++j )
     {
          fprintf ( f, "%s:", tree_map[j].name );
          pretty_print_tree ( ind->tr[j].data, f );
     }
}
DATATYPE evaluate_tree ( lnode *tree, int whichtree, farg msg)		  //
{
     lnode *l = tree;

#ifdef DEBUG_G
		 if(tree->f->code == f_loop_start||tree->f->code == f_loop_end){
			  cout<<msg.writeHead;
				pretty_print_tree(tree,stdout);
		 }
#endif

#ifdef DEBUG_EVAL
     oprintf(OUT_SYS, 30, "call to evaluate_tree in context %d\n", whichtree );
#endif

//*	 oprintf(OUT_SYS, 30,"*  tree->f->string= %s\n , whichtree=%d in evaluate_tree",  tree->f->string, whichtree);	  
     DATATYPE rt = evaluate_tree_recurse ( &l, whichtree, msg );				//
	 return  rt;
}