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 741, Tue May 17 17:44:02 2005 UTC revision 890, Thu Sep 1 17:18:08 2005 UTC
# Line 3  Line 3 
3    
4  SEXP tsc_validate(SEXP x)  SEXP tsc_validate(SEXP x)
5  {  {
6      SEXP val;      return triangularMatrix_validate(x);
7        /* see ./dtpMatrix.c as example to do more testing here */
     if (isString(val = check_scalar_string(GET_SLOT(x, Matrix_uploSym),  
                                            "LU", "uplo"))) return val;  
     if (isString(val = check_scalar_string(GET_SLOT(x, Matrix_diagSym),  
                                            "NU", "diag"))) return val;  
     return ScalarLogical(1);  
8  }  }
9    
10  SEXP tsc_transpose(SEXP x)  SEXP tsc_transpose(SEXP x)

Legend:
Removed from v.741  
changed lines
  Added in v.890

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