The R Project SVN R

Rev

Rev 13710 | Rev 29216 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13710 Rev 28991
Line 20... Line 20...
20
   under the terms of the GNU Library General Public License.
20
   under the terms of the GNU Library General Public License.
21
   GraphApp is distributed in the hope that it will be useful, but
21
   GraphApp is distributed in the hope that it will be useful, but
22
   WITHOUT ANY WARRANTY.
22
   WITHOUT ANY WARRANTY.
23
 
23
 
24
   See the file COPYLIB.TXT for details.
24
   See the file COPYLIB.TXT for details.
-
 
25
 
-
 
26
   Copyright (C) 2004 The R Foundation
25
*/
27
*/
26
 
28
 
27
#include "internal.h"
29
#include "internal.h"
28
 
30
 
29
/*
31
/*
Line 434... Line 436...
434
}
436
}
435
 
437
 
436
/*
438
/*
437
 *  Perform the multi-child tree traversal.
439
 *  Perform the multi-child tree traversal.
438
 */
440
 */
439
static object tree_search(object top, HANDLE handle, int id, int key)
441
object tree_search(object top, HANDLE handle, int id, int key)
440
{
442
{
441
	object obj, first_object, found = NULL;
443
	object obj, first_object, found = NULL;
442
 
444
 
443
	if ((! top) || (! top->child))
445
	if ((! top) || (! top->child))
444
		return NULL;
446
		return NULL;