Move debug pickling dump out of the compiler.

    We'll put it in the usefile generator.

1 files changed, 13 insertions, 0 deletions

diff --git a/muse/main.c b/muse/main.c
index b46ef08..1255b76 100644
--- a/muse/main.c
+++ b/muse/main.c
@@ -28,6 +28,8 @@ int main(int argc, char **argv)
     int opt;
     int i;
     Stab *globls;
+    Node *rdback;
+    FILE *tmp;
 
     while ((opt = getopt(argc, argv, "dho:")) != -1) {
         switch (opt) {
@@ -55,6 +57,17 @@ int main(int argc, char **argv)
         yyparse();
 
         if (debug) {
+            /* test storing tree to file */
+            tmp = fopen("a.pkl", "w");
+            pickle(file, tmp);
+            fclose(tmp);
+
+            /* and reading it back */
+            tmp = fopen("a.pkl", "r");
+            rdback = unpickle(tmp);
+            dump(rdback, stdout);
+            fclose(tmp);
+
             /* before we do anything to the parse */
             dump(file, stdout);
         }