SCM

SCM Repository

[inlinedocs] Diff of /pkg/inlinedocs/R/test.R
ViewVC logotype

Diff of /pkg/inlinedocs/R/test.R

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

revision 275, Fri May 27 11:55:21 2011 UTC revision 307, Fri Oct 21 11:37:19 2011 UTC
# Line 26  Line 26 
26        .res <- .fun[[N]]        .res <- .fun[[N]]
27        res <- fun[[N]]        res <- fun[[N]]
28        if(is.null(res) || is.na(res) || is.na(.res) || .res!=res){        if(is.null(res) || is.na(res) || is.na(.res) || .res!=res){
29          stop(f,":\n\n",res,"\nin ",FUN,"$",N,", expected:\n\n",.res,"\n")          cat("\n-----\n",res,"\n-----\nin ",FUN,
30                "$",N,", expected:\n-----\n",.res,"\n-----\n")
31            stop("docs mismatch in ",f)
32        }        }
33      }      }
34      ## now check and see if there are no additional items!      ## now check and see if there are no additional items!

Legend:
Removed from v.275  
changed lines
  Added in v.307

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