The R Project SVN R

Rev

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

Rev 84772 Rev 85145
Line 421... Line 421...
421
> ## End(Not run)
421
> ## End(Not run)
422
> 
422
> 
423
> 
423
> 
424
> 
424
> 
425
> cleanEx()
425
> cleanEx()
-
 
426
> nameEx("checkRd")
-
 
427
> ### * checkRd
-
 
428
> 
-
 
429
> flush(stderr()); flush(stdout())
-
 
430
> 
-
 
431
> ### Name: checkRd
-
 
432
> ### Title: Check an Rd Object
-
 
433
> ### Aliases: checkRd
-
 
434
> ### Keywords: utilities documentation
-
 
435
> 
-
 
436
> ### ** Examples
-
 
437
> 
-
 
438
> ## parsed Rd from the installed version of _this_ help file
-
 
439
> rd <- Rd_db("tools")[["checkRd.Rd"]]
-
 
440
> stopifnot(length(checkRd(rd)) == 0)  # there should be no issues
-
 
441
> 
-
 
442
> ## make up \tabular issues
-
 
443
> bad <- r"(\name{bad}\title{bad}\description{\tabular{p}{1 \tab 2}})"
-
 
444
> (res <- checkRd(parse_Rd(textConnection(bad))))
-
 
445
checkRd: (7) <connection>:1: Unrecognized \tabular format: p
-
 
446
checkRd: (7) <connection>:1: Only 1 column allowed in this table
-
 
447
> stopifnot(length(res) > 0)
-
 
448
> 
-
 
449
> 
-
 
450
> 
-
 
451
> cleanEx()
426
> nameEx("checkRdaFiles")
452
> nameEx("checkRdaFiles")
427
> ### * checkRdaFiles
453
> ### * checkRdaFiles
428
> 
454
> 
429
> flush(stderr()); flush(stdout())
455
> flush(stderr()); flush(stdout())
430
> 
456
>