X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela.c;h=343f1ba87a751600b3601b47511be60b8fe2cae9;hb=9736129fb8de61a2ba9750564715557df22c4afc;hp=1cd7412806fe013cbb22fced8232b5e54fcd6bf9;hpb=d4cff32858a9ff65b06f1430810699a91fbcc2b9;p=gacela.git

diff --git a/gacela.c b/gacela.c
index 1cd7412..343f1ba 100644
--- a/gacela.c
+++ b/gacela.c
@@ -1,11 +1,33 @@
 #include <stdio.h>
+#include <readline/readline.h>
 
-int main (int argc, char *argv[])
+/* Read-Send-Print-Loop */
+void rspl ()
 {
-  char exp[1024];
+  static char *line = (char *)NULL;
+  int exit = 0;
+
+  while (!exit)
+    {
+      if (line)
+	{
+	  free (line);
+	  line = (char *)NULL;
+	}
+      
+      line = readline ("gacela>");
 
-  printf("gacela>");
-  scanf("%s", exp);
+      if (line && *line)
+	{
+	  add_history (line);
+	  if (strcmp (line, "(quit)") == 0)
+	    exit = 1;
+	}
+    }
+}
 
+int main (int argc, char *argv[])
+{
+  rspl ();
   return 0;
 }