ir treewalk fixes
[henge/apc.git] / src / apc.c
index 5bd6d73..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 "ir.h"
 
 #define DEFAULT_PAGESIZE 4096
 const char* cargs['Z'] = {0};
@@ -41,6 +42,8 @@ extern //ir.c
 int  ir_linker(void);
 extern //ir.c
 int  ir_condenser(void);
+extern
+void     ir_test(void);
 
 /* Main entry from terminal
    parses the command line and kicks off recursive scanning
@@ -62,7 +65,6 @@ int main
 #define DONE   -1
 #define SCANPATH (cargs['d'] ? cargs['d'] : "./")
 { int   opt;
-
  getopt:
   switch (opt = getopt(argc, argv, OPTS))
   { case 'd' :
@@ -88,10 +90,35 @@ int main
     { perror("init");
       exit(EXIT_FAILURE);
     }
+#if 0
   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();
   exit(EXIT_SUCCESS);