Mercurial > octave
comparison src/variables.cc @ 12114:22bc7fc7ff4d release-3-2-x
fix extract_function & add obsoleteness warning
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Wed, 13 Jan 2010 09:48:17 +0100 |
| parents | 854863bb29e8 |
| children |
comparison
equal
deleted
inserted
replaced
| 12113:232a0ddce7cd | 12114:22bc7fc7ff4d |
|---|---|
| 157 | 157 |
| 158 if (! error_state) | 158 if (! error_state) |
| 159 { | 159 { |
| 160 int parse_status; | 160 int parse_status; |
| 161 | 161 |
| 162 eval_string (cmd, true, parse_status); | 162 eval_string (cmd, true, parse_status, 0); |
| 163 | 163 |
| 164 if (parse_status == 0) | 164 if (parse_status == 0) |
| 165 { | 165 { |
| 166 retval = is_valid_function (fname, warn_for, 0); | 166 retval = is_valid_function (fname, warn_for, 0); |
| 167 | 167 |
| 169 { | 169 { |
| 170 error ("%s: `%s' is not valid as a function", | 170 error ("%s: `%s' is not valid as a function", |
| 171 warn_for.c_str (), fname.c_str ()); | 171 warn_for.c_str (), fname.c_str ()); |
| 172 return retval; | 172 return retval; |
| 173 } | 173 } |
| 174 | |
| 175 warning ("%s: passing function body as a string is obsolete." | |
| 176 " Please use anonymous functions.", warn_for.c_str ()); | |
| 174 } | 177 } |
| 175 else | 178 else |
| 176 error ("%s: `%s' is not valid as a function", | 179 error ("%s: `%s' is not valid as a function", |
| 177 warn_for.c_str (), fname.c_str ()); | 180 warn_for.c_str (), fname.c_str ()); |
| 178 } | 181 } |