+/* Set up the prompt and expand it. Called from readline() and
+ rl_callback_handler_install (). */
+int
+rl_set_prompt (prompt)
+ const char *prompt;
+{
+ FREE (rl_prompt);
+ rl_prompt = prompt ? savestring (prompt) : (char *)NULL;
+
+ rl_visible_prompt_length = (rl_prompt && *rl_prompt)
+ ? rl_expand_prompt (rl_prompt)
+ : 0;
+ return 0;
+}
+