cleanup

2017-04-15 00:23:13 +09:00
parent 342ed57507
commit 4e4360a0e8
4 changed files with 883 additions and 884 deletions
@@ -46,7 +46,7 @@ main(int argc, char *argv[])
        }
        port = pic_fopen(pic, file, "r");
      }
-      pic_printf(pic, "~s\n", pic_funcall(pic, "compile", 1, pic_funcall(pic, "expand", 2, pic_read(pic, port), pic_ref(pic, "default-environment"))));
+      pic_printf(pic, "~s\n", pic_funcall(pic, "compile", 1, pic_read(pic, port)));
    } else {
      fprintf(stderr, "usage: mini-picrin [-c] [file]\n");
      exit(1);