SCM

SCM Repository

[matrix] Diff of /pkg/Matrix/tests/validObj.R
ViewVC logotype

Diff of /pkg/Matrix/tests/validObj.R

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

revision 2888, Wed Aug 7 13:56:43 2013 UTC revision 2889, Thu Aug 8 21:06:22 2013 UTC
# Line 117  Line 117 
117  m.@i <- m.i <- mm@i[ip]  m.@i <- m.i <- mm@i[ip]
118  m.@x <- m.x <- mm@x[ip]  m.@x <- m.x <- mm@x[ip]
119  stopifnot(grep("row indices are not", validObject(m., test=TRUE)) == 1)  stopifnot(grep("row indices are not", validObject(m., test=TRUE)) == 1)
120  ##  Matrix:::.sortCsparse(m.) # don't use this at home, boys!
121    m. # now is fixed
122    
123  ## Make sure that validObject() objects...  ## Make sure that validObject() objects...
124  ## 1) to wrong 'p'  ## 1) to wrong 'p'
125  m. <- mm; m.@p[1] <- 1L  m. <- mm; m.@p[1] <- 1L

Legend:
Removed from v.2888  
changed lines
  Added in v.2889

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