Mercurial > hg > octave-nkf

comparison liboctave/MArray-misc.cc @ 4543:79df15d4470c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-10-18 03:53:52 by jwe]
author jwe
date Sat, 18 Oct 2003 03:53:53 +0000
parents 8b262e771614
children
comparison
equal deleted inserted replaced
4542:2633831cbeb5 4543:79df15d4470c
24 #include <config.h> 24 #include <config.h>
25 #endif 25 #endif
26 26
27 #include "MArray.h" 27 #include "MArray.h"
28 #include "MArray2.h" 28 #include "MArray2.h"
29 #include "dim-vector.h"
29 #include "lo-error.h" 30 #include "lo-error.h"
30 31
31 void 32 void
32 gripe_nonconformant (const char *op, int op1_len, int op2_len) 33 gripe_nonconformant (const char *op, int op1_len, int op2_len)
33 { 34 {
43 (*current_liboctave_error_handler) 44 (*current_liboctave_error_handler)
44 ("%s: nonconformant arguments (op1 is %dx%d, op2 is %dx%d)", 45 ("%s: nonconformant arguments (op1 is %dx%d, op2 is %dx%d)",
45 op, op1_nr, op1_nc, op2_nr, op2_nc); 46 op, op1_nr, op1_nc, op2_nr, op2_nc);
46 } 47 }
47 48
49 void
50 gripe_nonconformant (const char *op, dim_vector& op1_dims,
51 dim_vector& op2_dims)
52 {
53 std::string op1_dims_str = op1_dims.str ();
54 std::string op2_dims_str = op2_dims.str ();
55
56 (*current_liboctave_error_handler)
57 ("%s: nonconformant arguments (op1 is %s, op2 is %s)",
58 op, op1_dims_str.c_str (), op2_dims_str.c_str ());
59 }
60
61
48 /* 62 /*
49 ;;; Local Variables: *** 63 ;;; Local Variables: ***
50 ;;; mode: C++ *** 64 ;;; mode: C++ ***
51 ;;; End: *** 65 ;;; End: ***
52 */ 66 */