Mercurial > octave-nkf

diff src/ops.h @ 4550:69a9b22a72a2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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	Mon Oct 27 03:31:29 2003 +0000
+++ b/src/ops.h	Mon Oct 27 15:41:55 2003 +0000
@@ -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) \