SCM

SCM Repository

[matrix] Diff of /pkg/src/Csparse.c
ViewVC logotype

Diff of /pkg/src/Csparse.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2386, Wed May 27 20:54:45 2009 UTC revision 2387, Fri May 29 12:50:34 2009 UTC
# Line 599  Line 599 
599          break;          break;
600    
601      default: /* -1 from above */      default: /* -1 from above */
602          error("diag_tC(): invalid 'resultKind'");          error(_("diag_tC(): invalid 'resultKind'"));
603          /* Wall: */ ans = R_NilValue; v = REAL(ans);          /* Wall: */ ans = R_NilValue; v = REAL(ans);
604      }      }
605    
# Line 675  Line 675 
675                  if (p[ii] > p[ii + 1])                  if (p[ii] > p[ii + 1])
676                      error(_("p must be non-decreasing"));                      error(_("p must be non-decreasing"));
677              if (p[np] != nnz)              if (p[np] != nnz)
678                  error(_("p[np] = %d != nnz = %d"), p[np], nnz);                  error("p[np] = %d != nnz = %d", p[np], nnz);
679              ij = Calloc(nnz, int);              ij = Calloc(nnz, int);
680              if (mi) {              if (mi) {
681                  i = ij;                  i = ij;

Legend:
Removed from v.2386  
changed lines
  Added in v.2387

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge