Mercurial > hg > Gears > GearsAgda
comparison src/llrb/main.c @ 77:618c03f25108
implement insert(tail recursion)
author | Shohei KOKUBO <e105744@ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 27 Nov 2015 02:14:25 +0900 |
parents | 2667c3251a00 |
children | dc6f665bb753 |
comparison
equal
deleted
inserted
replaced
76:7ad6d1502a03 | 77:618c03f25108 |
---|---|
90 struct Node* node = &context->data[Node]->node; | 90 struct Node* node = &context->data[Node]->node; |
91 node->key = 5; | 91 node->key = 5; |
92 | 92 |
93 context->next = Code5; | 93 context->next = Code5; |
94 | 94 |
95 goto meta(context, Delete); | 95 goto meta(context, Exit); |
96 } | 96 } |
97 | 97 |
98 __code code5(struct Context* context) { | 98 __code code5(struct Context* context) { |
99 puts("---after---"); | 99 puts("---after---"); |
100 print_tree(context->data[Tree]->tree.root, 0); | 100 print_tree(context->data[Tree]->tree.root, 0); |