ir treewalk fixes

[henge/apc.git] / src / apc.c

diff --git a/src/apc.c b/src/apc.c
index a066765..df4810e 100644 (file)
--- a/src/apc.c
+++ b/src/apc.c
@@ -20,6 +20,7 @@
 #include <unistd.h> //getopt, sysconf
 /* Internal */
 #include "parser.tab.h" //bison
 #include <unistd.h> //getopt, sysconf
 /* Internal */
 #include "parser.tab.h" //bison

+#include "ir.h"

 
 #define DEFAULT_PAGESIZE 4096
 const char* cargs['Z'] = {0};
 
 #define DEFAULT_PAGESIZE 4096
 const char* cargs['Z'] = {0};


@@ -64,12 +65,6 @@ int main
 #define DONE   -1
 #define SCANPATH (cargs['d'] ? cargs['d'] : "./")
 { int   opt;
 #define DONE   -1
 #define SCANPATH (cargs['d'] ? cargs['d'] : "./")
 { int   opt;

-  if ((sys_pagesize = sysconf(_SC_PAGESIZE)) == 0)
-    sys_pagesize = DEFAULT_PAGESIZE;
-  if (ir_init())
-    { perror("init");
-      exit(EXIT_FAILURE);
-    }

  getopt:
   switch (opt = getopt(argc, argv, OPTS))
   { case 'd' :
  getopt:
   switch (opt = getopt(argc, argv, OPTS))
   { case 'd' :


@@ -89,10 +84,40 @@ int main
     case DONE:
       break;
   }
     case DONE:
       break;
   }

+  if ((sys_pagesize = sysconf(_SC_PAGESIZE)) == 0)
+    sys_pagesize = DEFAULT_PAGESIZE;
+  if (ir_init())
+    { perror("init");
+      exit(EXIT_FAILURE);
+    }
+#if 0

   if (scanner_scanpath(SCANPATH))
     { perror("scanner");
       exit(EXIT_FAILURE);
     }
   if (scanner_scanpath(SCANPATH))
     { perror("scanner");
       exit(EXIT_FAILURE);
     }

+#endif
+  ir_class class;
+  ir_set   set;
+  int i, j;
+  char wordbuf[0xFFF];
+  for (class = ir_class_root(), i = 0, j = 0; i < 100; i++)
+    { sprintf(wordbuf,"Class%i",i);
+      class = ir_class_addchild(class,(uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-s%i",i,j++);
+      set = ir_class_addset(class, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-s%i",i,j++);
+      ir_class_addset(class, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-s%i",i,j++);
+      ir_class_addset(class, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-sc%i",i,j=0);
+      set = ir_set_addchild(set, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-sc%i",i,++j);
+      ir_set_addchild(set, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-sc%i",i,++j);
+      set = ir_set_addchild(set, (uint8_t*)wordbuf);
+      sprintf(wordbuf,"c%i-sb%i",i,j=0);
+      ir_set_addchild(set, (uint8_t*)wordbuf);
+    }

   ir_test();
   ir_linker();
   ir_condenser();
   ir_test();
   ir_linker();
   ir_condenser();