Mercurial > octave

diff src/OPERATORS/op-cm-s.cc @ 4915:c638c144d4da

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-07-23 19:01:22 by jwe]
author jwe
date Fri, 23 Jul 2004 19:01:23 +0000
parents c7ae43dfdea4
children 57077d0ddc8e
line wrap: on
line diff
--- a/src/OPERATORS/op-cm-s.cc	Fri Jul 23 16:55:13 2004 +0000
+++ b/src/OPERATORS/op-cm-s.cc	Fri Jul 23 19:01:23 2004 +0000
@@ -105,6 +105,8 @@
 DEFNDBINOP_FN (el_and, complex_matrix, scalar, complex_array, scalar, mx_el_and)
 DEFNDBINOP_FN (el_or,  complex_matrix, scalar, complex_array, scalar, mx_el_or)
 
+DEFNDCATOP_FN (cm_s, complex_matrix, scalar, complex_array, array, concat)
+
 DEFNDASSIGNOP_FN (assign, complex_matrix, scalar, complex_array, assign)
 
 void
@@ -129,6 +131,8 @@
   INSTALL_BINOP (op_el_and, octave_complex_matrix, octave_scalar, el_and);
   INSTALL_BINOP (op_el_or, octave_complex_matrix, octave_scalar, el_or);
 
+  INSTALL_CATOP (octave_complex_matrix, octave_scalar, cm_s);
+
   INSTALL_ASSIGNOP (op_asn_eq, octave_complex_matrix, octave_scalar, assign);
 }