#ifdef AIX_PROD
static char sccsid[] = "@(#)47	1.3  src/examples/pubsex/strtree/manager.c, examples.src, os2dce21.dss, 960602a.1 6/26/95 14:35:02";
/*
 *   COMPONENT_NAME: examples.src
 *
 *   FUNCTIONS: st_prune_left
 *
 *   ORIGINS: 72
 *
 */
#endif /* AIX_PROD */


#include <stdio.h>
#include "string_tree.h"

#ifndef IBMOS2
#define DCEAPI
#endif

/*
** Prune the left subtree of the specified tree and return
** it as the function value.
*/
st_node_t * DCEAPI st_prune_left( /* [in, out] */ st_node_t *tree )
{
  st_node_t *left_sub_tree = tree->left;
  tree->left = (st_node_t *)NULL;
  return left_sub_tree;
}


