SCM

SCM Repository

[matrix] Diff of /branches/Matrix-mer2/src/dtpMatrix.c
ViewVC logotype

Diff of /branches/Matrix-mer2/src/dtpMatrix.c

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

pkg/src/dtpMatrix.c revision 951, Wed Sep 28 12:42:51 2005 UTC branches/Matrix-mer2/src/dtpMatrix.c revision 985, Fri Oct 21 19:33:37 2005 UTC
# Line 185  Line 185 
185      SET_SLOT(val, Matrix_DimNamesSym, duplicate(dmnP));      SET_SLOT(val, Matrix_DimNamesSym, duplicate(dmnP));
186      SET_SLOT(val, Matrix_diagSym, duplicate(diag));      SET_SLOT(val, Matrix_diagSym, duplicate(diag));
187      SET_SLOT(val, Matrix_uploSym, duplicate(uplo));      SET_SLOT(val, Matrix_uploSym, duplicate(uplo));
188      packed_to_full(REAL(ALLOC_SLOT(val, Matrix_xSym, REALSXP, n*n)),      packed_to_full_double(REAL(ALLOC_SLOT(val, Matrix_xSym, REALSXP, n*n)),
189                     REAL(GET_SLOT(from, Matrix_xSym)), n,                     REAL(GET_SLOT(from, Matrix_xSym)), n,
190                     *CHAR(STRING_ELT(uplo, 0)) == 'U' ? UPP : LOW);                     *CHAR(STRING_ELT(uplo, 0)) == 'U' ? UPP : LOW);
191      UNPROTECT(1);      UNPROTECT(1);

Legend:
Removed from v.951  
changed lines
  Added in v.985

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