Mercurial > hg > octave-nkf
diff src/pt-const.cc @ 1728:42b4f904f1af
[project @ 1996-01-09 11:36:01 by jwe]
author | jwe |
---|---|
date | Tue, 09 Jan 1996 11:41:43 +0000 |
parents | 62ad73f2ebd0 |
children | c43d042f20be |
line wrap: on
line diff
--- a/src/pt-const.cc +++ b/src/pt-const.cc @@ -32,6 +32,8 @@ #include <cctype> #include <cstring> +#include <string> + #include <fstream.h> #include <iostream.h> #include <strstream.h> @@ -1448,16 +1450,17 @@ } } -const char * +string TC_REP::string_value (void) const { + string retval; + if (type_tag == char_matrix_constant_str) - return char_matrix->row_as_string (0); // XXX FIXME??? XXX + retval = char_matrix->row_as_string (0); // XXX FIXME??? XXX else - { - gripe_invalid_conversion (type_as_string (), "string"); - return 0; - } + gripe_invalid_conversion (type_as_string (), "string"); + + return retval; } Range