SCM

SCM Repository

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

Diff of /pkg/Matrix/src/dtCMatrix.c

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

revision 358, Sat Nov 27 17:57:19 2004 UTC revision 367, Sun Dec 5 13:50:43 2004 UTC
# Line 117  Line 117 
117      SEXP ans = PROTECT(NEW_OBJECT(MAKE_CLASS("tscMatrix")));      SEXP ans = PROTECT(NEW_OBJECT(MAKE_CLASS("tscMatrix")));
118      int *ap, *ai, *dims, *pr = INTEGER(par),      int *ap, *ai, *dims, *pr = INTEGER(par),
119          countDiag = 1 - asLogical(unitdiag),          countDiag = 1 - asLogical(unitdiag),
120          j, k, n = length(par), nnz;          j, n = length(par), nnz;
121      double *ax;      double *ax;
122    
123      if (!isInteger(par)) error("par argument must be an integer vector");      if (!isInteger(par)) error("par argument must be an integer vector");

Legend:
Removed from v.358  
changed lines
  Added in v.367

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