[Rd] bindingIsLocked returns illogical logical

[Martin Morgan]

bindingIsLocked applied to a locked binding returns a 'logical' that
is niether true nor false.

Martin

> e <- new.env()
> e$x <- 1
> e$y <- 2
> lockBinding("x", e)
NULL
> bindingIsLocked("x", e)
[1] TRUE
> bindingIsLocked("x", e)==TRUE
[1] FALSE
> bindingIsLocked("x", e)==FALSE
[1] FALSE
> bindingIsLocked("y", e)
[1] FALSE
> bindingIsLocked("y", e)==FALSE
[1] TRUE
> bindingIsLocked("y", e)==TRUE
[1] FALSE
> sessionInfo()
R version 2.4.0 Under development (unstable) (2006-05-13 r38060) 
x86_64-unknown-linux-gnu 

attached base packages:
[1] "methods"   "stats"     "graphics"  "grDevices" "utils"     "datasets" 
[7] "base"