}
else if (lex_match_id (lexer, "SYSMIS"))
set_map_out_num (out, SYSMIS);
- else if (lex_token (lexer) == T_STRING)
+ else if (lex_is_string (lexer))
{
set_map_out_str (out, pool, lex_tokstr (lexer));
lex_get (lexer);
msg_disable ();
match = data_in (ss_buffer (CHAR_CAST_BUG (char *, value), width),
- LEGACY_NATIVE, FMT_F, 0, 0, 0, trns->dst_dict,
+ LEGACY_NATIVE, FMT_F, 0, 0, trns->dst_dict,
&uv, 0);
msg_enable ();
out->value.f = uv.f;