blob: 97828a8cff042b19a02ac2254b9f1217f89549dc [file] [log] [blame]
/* For copyright information, see olden_v1.0/COPYRIGHT */
/* tree-alloc.c
*/
#ifndef TORONTO
#include "mem-ref.h"
#include "future-cell.h"
#endif
#include "tree.h"
extern void *malloc(unsigned);
tree_t *TreeAlloc (int level, int lo, int proc) {
if (level == 0)
return NULL;
else {
struct tree *new, *right, *left;
new = (struct tree *) malloc(sizeof(tree_t));
left = TreeAlloc(level -1, lo+proc/2, proc/2);
right=TreeAlloc(level-1,lo,proc/2);
new->val = 1;
new->left = (struct tree *) left;
new->right = (struct tree *) right;
return new;
}
}