#include <language/command.h>
#include <language/lexer/format-parser.h>
#include <language/lexer/lexer.h>
-#include <language/line-buffer.h>
+#include <language/prompt.h>
#include <libpspp/alloc.h>
#include <libpspp/compiler.h>
#include <libpspp/copyleft.h>
do_cc (cmd.s_cce, FMT_CCE);
if (cmd.sbc_prompt)
- getl_set_prompt (GETL_PROMPT_FIRST, cmd.s_prompt);
+ prompt_set (PROMPT_FIRST, cmd.s_prompt);
if (cmd.sbc_cprompt)
- getl_set_prompt (GETL_PROMPT_LATER, cmd.s_cprompt);
+ prompt_set (PROMPT_LATER, cmd.s_cprompt);
if (cmd.sbc_dprompt)
- getl_set_prompt (GETL_PROMPT_DATA, cmd.s_dprompt);
+ prompt_set (PROMPT_DATA, cmd.s_dprompt);
if (cmd.sbc_decimal)
fmt_set_decimal (cmd.dec == STC_DOT ? '.' : ',');
struct cmd_set *cmd UNUSED, void *aux UNUSED)
{
lex_match (lexer, '=');
- if ((lex_token (lexer) == T_ID && lex_id_match ("SYSMIS", lex_tokid (lexer))))
+ if (lex_match_id (lexer, "SYSMIS"))
{
lex_get (lexer);
set_blanks (SYSMIS);
if (var == NULL)
msg (SN, _("WEIGHT is off."));
else
- msg (SN, _("WEIGHT is variable %s."), var->name);
+ msg (SN, _("WEIGHT is variable %s."), var_get_name (var));
}
static void