change whl to while

[calc.git] / parser.c

diff --git a/parser.c b/parser.c
index 11d586036205526817487a9446c039c2917cea8f..c023a6e959a5fe6fb3f86f76fba752bb97a0745b 100644 (file)
--- a/parser.c
+++ b/parser.c
@@ -139,7 +139,7 @@ keyword_t functions[NB_FUNCTIONS] = {
     { "help", Help, 0, 4, 9},
     { "!",    Not, 1, 1, 6},
     { "cond", Cond, 3, 4, 5},
-    { "whl",  While, 2, 3, 5}
+    { "while", While, 2, 5, 5}
 };
 
 #define NB_CONSTANTS 3
@@ -633,7 +633,7 @@ void help (void)
     fprintf (stdout, "storage functions:");
     fprintf (stdout, " sto rcl inc dec\n");
     fprintf (stdout, "conditional functions:");
-    fprintf (stdout, " cond\n");
+    fprintf (stdout, " cond while\n");
     fprintf (stdout, "miscellaneous functions:");
     fprintf (stdout, " quit help\n");
     fprintf (stdout, "supported constants:");