SCM

SCM Repository

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

Diff of /pkg/src/lgCMatrix.c

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

revision 1659, Wed Nov 1 17:50:15 2006 UTC revision 1660, Thu Nov 2 11:05:35 2006 UTC
# Line 1  Line 1 
1  #include "lgCMatrix.h"  #include "lgCMatrix.h"
2    
3  SEXP lgCMatrix_validate(SEXP x)  #include "dgCMatrix.h"
4  {  /* validate: -> gCMatrix_validate() in ./dgCMatrix.c */
     /* Almost all is now done in Csparse_validate  
      * *but* the checking of the 'x' slot */  
     SEXP islot = GET_SLOT(x, Matrix_iSym),  
         xslot = GET_SLOT(x, Matrix_xSym);  
   
     if (length(islot) != length(xslot))  
         return mkString(_("lengths of slots 'i' and 'x' must match"));  
   
     return ScalarLogical(1);  
 }  
5    
6  SEXP lcsc_to_matrix(SEXP x)  SEXP lcsc_to_matrix(SEXP x)
7  {  {

Legend:
Removed from v.1659  
changed lines
  Added in v.1660

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