- { {eval_set}, {eval_open}, {eval_close}, {eval_get_command},
- {eval_config_command}, {eval_get_variable}, {eval_config_variable},
- {eval_save_config} };
+ { {eval_help, "help"},
+ {eval_set, "set SYMBOL FORM"},
+ {eval_open, "open LANG NAME"},
+ {eval_close, "close SYMBOL"},
+ {eval_get_command, "get-command LANG NAME [COMMAND]"},
+ {eval_config_command, "config-command LANG NAME [COMMAND [(KEY ...) ...]]"},
+ {eval_get_variable, "get-variable LANG NAME [VARIABLE]"},
+ {eval_config_variable, "config-variable LANG NAME [VARIABLE [VALUE]]"},
+ {eval_save_config, "save-config"} };
+
+MPlist *
+eval_help (MPlist *arg)
+{
+ int i;
+
+ printf ("Valid FORMs are:\n");
+ for (i = 0; i < (sizeof eval_functions) / (sizeof eval_functions[0]); i++)
+ printf (" %s\n", eval_functions[i].form);
+ printf (" SYMBOL -- print the value of SYMBOL\n");
+ return NULL;
+}