Mercurial > hg > octave-lyh
diff src/ops.h @ 4550:69a9b22a72a2
[project @ 2003-10-27 15:41:55 by jwe]
author | jwe |
---|---|
date | Mon, 27 Oct 2003 15:41:55 +0000 |
parents | 79df15d4470c |
children | 334a27c8f453 |
line wrap: on
line diff
--- a/src/ops.h +++ b/src/ops.h @@ -190,11 +190,11 @@ return octave_value (op v.t ## _value ()); \ } -#define DEFNDUNOP_OP(name, t, op) \ +#define DEFNDUNOP_OP(name, t, e, op) \ UNOPDECL (name, a) \ { \ CAST_UNOP_ARG (const octave_ ## t&); \ - return octave_value (op v.array_value ()); \ + return octave_value (op v.e ## _value ()); \ } // XXX FIXME XXX -- in some cases, the constructor isn't necessary. @@ -206,11 +206,11 @@ return octave_value (f (v.t ## _value ())); \ } -#define DEFNDUNOP_FN(name, t, f) \ +#define DEFNDUNOP_FN(name, t, e, f) \ UNOPDECL (name, a) \ { \ CAST_UNOP_ARG (const octave_ ## t&); \ - return octave_value (f (v.array_value ())); \ + return octave_value (f (v.e ## _value ())); \ } #define DEFNCUNOP_METHOD(name, t, method) \