The R Project SVN R

Rev

Rev 74472 | Rev 82990 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 74472 Rev 74742
Line 1... Line 1...
1 
## check that all S3 methods in base are registered.
 1 
## check that all S3 methods in base are registered.
2 
## See the end of src/library/base/R/zzz.R ...
 2 
## See the end of src/library/base/R/zzz.R ...
- 
 
 3 
(function() {
- 
 
 4 
  old <- Sys.setlocale("LC_COLLATE", "C")
- 
 
 5 
  on.exit(Sys.setlocale("LC_COLLATE", old))
3 
stopifnot(identical(base:::.S3_methods_table,
 6 
  stopifnot(identical(base:::.S3_methods_table,
4 
                    tools:::.make_S3_methods_table_for_base()))
 7 
                      tools:::.make_S3_methods_table_for_base()))
- 
 
 8 
})()