some development work

git-svn-id: https://dev.arachne.cz/repos/cll1h/trunk@61 4bb87942-c103-4e5a-b51c-0ebff58f8515

diff --git a/demos/trees.c b/demos/trees.c
new file mode 100644 (file)
index 0000000..d08bc15
--- /dev/null
+++ b/demos/trees.c
@@ -0,0 +1,31 @@
+#include "cll1.h"
+
+def_mem(Leaf)
+{
+ int value; 
+ array(Leaf);
+};
+
+program
+{ 
+ Leaf leaf,root=NULL;
+
+ for_ints(i,  8,1,-2,745,-32,-64,27,4 ) printf(" [%d]",i)
+ {
+  leaf=get_mem(Leaf);
+
+  //init
+  leaf->__next=NULL;
+  leaf->__seek=NULL;
+  leaf->__key=i;
+
+  //grow tree
+  for(leaf=root; leaf && leaf->__key >= i ; leaf=leaf->__next)
+  {
+  if(leaf->__seek->key >=)
+  }
+ 
+ 
+ }
+ 
+}