interpret entirely in foci

1 files changed, 2 insertions, 21 deletions

diff --git a/main.c b/main.c
index 66dcce3..4429d2d 100644
--- a/main.c
+++ b/main.c
@@ -33,30 +33,11 @@ int foci_getchar(void)
 
 int main()
 {
-    char buf[128];
-
     init();
 
     for (;;) {
-        char c;
-        do c = getchar();
-        while (!isgraph(c));
-
-        char *s = buf;
-        do {
-            *s++ = c;
-            c = getchar();
-        } while (isgraph(c));
-        bool eol = c == '\n' || c == '\r';
-        *s = '\0';
-
-        if (strcmp(buf, "bye") == 0)
-            break;
-
-        parse_word(buf, s);
-
-        if (eol)
-            printf(compiling() ? "compiled <%d>\n" : "ok <%d>\n", depth());
+        interpret();
+        printf(compiling() ? "compiled <%d>\n" : "ok <%d>\n", depth());
     }
 
     return 0;