Mercurial > octave-nkf
diff src/ov-cell.cc @ 9813:8fa32b527d9a
improve & partially revert previous change
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Fri, 13 Nov 2009 11:45:39 +0100 |
| parents | ea88eece12f5 |
| children | b3089dba88bf |
line wrap: on
line diff
--- a/src/ov-cell.cc Thu Nov 12 15:47:58 2009 +0100 +++ b/src/ov-cell.cc Fri Nov 13 11:45:39 2009 +0100 @@ -1426,6 +1426,35 @@ return retval; } +octave_value +octave_cell::map (unary_mapper_t umap) const +{ + switch (umap) + { +#define FORWARD_MAPPER(UMAP) \ + case umap_ ## UMAP: \ + return matrix.UMAP () + FORWARD_MAPPER (xisalnum); + FORWARD_MAPPER (xisalpha); + FORWARD_MAPPER (xisascii); + FORWARD_MAPPER (xiscntrl); + FORWARD_MAPPER (xisdigit); + FORWARD_MAPPER (xisgraph); + FORWARD_MAPPER (xislower); + FORWARD_MAPPER (xisprint); + FORWARD_MAPPER (xispunct); + FORWARD_MAPPER (xisspace); + FORWARD_MAPPER (xisupper); + FORWARD_MAPPER (xisxdigit); + FORWARD_MAPPER (xtoascii); + FORWARD_MAPPER (xtolower); + FORWARD_MAPPER (xtoupper); + + default: + return octave_base_value::map (umap); + } +} + /* ;;; Local Variables: *** ;;; mode: C++ ***