X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Futilities%2Fecho.c;h=b27b40017a367c397901acfb932bb1e81166ad2e;hb=d8493b3b0617cc447446a70b031a69079bc19002;hp=74136da303299e975baa9ba9176719516f92edd2;hpb=9f087e7aa4cdff1d5d46d5e188c0017a9d2d0029;p=pspp diff --git a/src/language/utilities/echo.c b/src/language/utilities/echo.c index 74136da303..b27b40017a 100644 --- a/src/language/utilities/echo.c +++ b/src/language/utilities/echo.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 2005 Free Software Foundation, Inc. + Copyright (C) 2005, 2009, 2010 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -19,8 +19,7 @@ #include #include #include -#include -#include +#include #include "xalloc.h" @@ -30,13 +29,10 @@ cmd_echo (struct lexer *lexer, struct dataset *ds UNUSED) { struct tab_table *tab; - if (lex_token (lexer) != T_STRING) + if (!lex_force_string (lexer)) return CMD_FAILURE; - tab = tab_create(1, 1, 0); - - tab_dim (tab, tab_natural_dimensions); - tab_flags (tab, SOMF_NO_TITLE ); + tab = tab_create(1, 1); tab_text(tab, 0, 0, 0, ds_cstr (lex_tokstr (lexer)));