Mercurial > octave

comparison src/tc-assign.cc @ 151:527a597cfe47

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-10-10 15:03:18 by jwe]
author jwe
date Sun, 10 Oct 1993 15:03:18 +0000
parents 5167d307c1c9
children e2c950dd96d2
comparison
equal deleted inserted replaced
150:5167d307c1c9 151:527a597cfe47
839 break; 839 break;
840 case magic_colon: 840 case magic_colon:
841 { 841 {
842 int nc = columns (); 842 int nc = columns ();
843 int new_nc = nc; 843 int new_nc = nc;
844 if (nc == 0 || rows () == 0) 844 if (nc == 0)
845 new_nc = rhs_nc; 845 new_nc = rhs_nc;
846 846
847 if (! indexed_assign_conforms (iv.capacity (), new_nc, 847 if (! indexed_assign_conforms (iv.capacity (), new_nc,
848 rhs_nr, rhs_nc)) 848 rhs_nr, rhs_nc))
849 { 849 {
941 break; 941 break;
942 case magic_colon: 942 case magic_colon:
943 { 943 {
944 int nc = columns (); 944 int nc = columns ();
945 int new_nc = nc; 945 int new_nc = nc;
946 if (nc == 0 || rows () == 0) 946 if (nc == 0)
947 new_nc = rhs_nc; 947 new_nc = rhs_nc;
948 948
949 if (! indexed_assign_conforms (ri.nelem (), new_nc, rhs_nr, rhs_nc)) 949 if (! indexed_assign_conforms (ri.nelem (), new_nc, rhs_nr, rhs_nc))
950 { 950 {
951 error ("A(range,:) = X: the number of rows in X must match\ 951 error ("A(range,:) = X: the number of rows in X must match\
1016 Matrix mj = tmp_j.matrix_value (); 1016 Matrix mj = tmp_j.matrix_value ();
1017 idx_vector jv (mj, user_pref.do_fortran_indexing, "column", 1017 idx_vector jv (mj, user_pref.do_fortran_indexing, "column",
1018 columns ()); 1018 columns ());
1019 int nr = rows (); 1019 int nr = rows ();
1020 int new_nr = nr; 1020 int new_nr = nr;
1021 if (nr == 0 || columns () == 0) 1021 if (nr == 0)
1022 new_nr = rhs_nr; 1022 new_nr = rhs_nr;
1023 1023
1024 if (! indexed_assign_conforms (new_nr, jv.capacity (), 1024 if (! indexed_assign_conforms (new_nr, jv.capacity (),
1025 rhs_nr, rhs_nc)) 1025 rhs_nr, rhs_nc))
1026 { 1026 {
1039 case range_constant: 1039 case range_constant:
1040 { 1040 {
1041 Range rj = tmp_j.range_value (); 1041 Range rj = tmp_j.range_value ();
1042 int nr = rows (); 1042 int nr = rows ();
1043 int new_nr = nr; 1043 int new_nr = nr;
1044 if (nr == 0 || columns () == 0) 1044 if (nr == 0)
1045 new_nr = rhs_nr; 1045 new_nr = rhs_nr;
1046 1046
1047 if (! indexed_assign_conforms (new_nr, rj.nelem (), rhs_nr, rhs_nc)) 1047 if (! indexed_assign_conforms (new_nr, rj.nelem (), rhs_nr, rhs_nc))
1048 { 1048 {
1049 error ("A(:,range) = X: the number of rows in X must match\ 1049 error ("A(:,range) = X: the number of rows in X must match\