Question

在检查函数的R代码时，它列出了一个字节码（例如，对于glm）:. 我到处寻找一个简单的解释，实际上是“0x7f8f3c954540”。我知道字节码是什么，但我假设“0x7f8f3c954540”实际上并不是glm函数整个代码的高度压缩机器可处理版本。它是CRC，它在内存中的位置的链接，还是前几位？

Answer 1

如果查看R源代码中print.c中的代码，可以看到该行打印了

Rprintf("<bytecode: %p>\n", BODY(s));

这意味着它将指针地址打印到函数体的编译版本。

因此相同的函数体代码可能指向两个不同的地址。观察

f1<-function(a) {
    sum(runif(a) * 1/(1:a))
}
f2 <- f1
f1 <- compiler:::cmpfun(f1)
f2 <- compiler:::cmpfun(f2)
f3 <- f2

f1
# function(a) {
#       sum(runif(a) * 1/(1:a))
#    }
#<bytecode: 0x111cbb358>

f2
# function(a) {
#       sum(runif(a) * 1/(1:a))
#     }
# <bytecode: 0x111bd7800>

f3
#  function(a) {
#       sum(runif(a) * 1/(1:a))
#    }
#<bytecode: 0x111bd7800>

您可以看到即使f1和f2具有相同的正文代码，它们也有不同的字节码值。如果你想看看这两个函数是否相同，你可以使用

identical(f1,f2)
# [1] TRUE
identical(f2,f3)
# [1] TRUE

但请注意默认是忽略函数的编译部分。如果你想看看他们是否也指向相同的bytyecode

identical(f1,f2, ignore.bytecode=FALSE)
# [1] FALSE
identical(f2,f3, ignore.bytecode=FALSE)
# [1] TRUE

因此，字节码值不会告诉您有关代码本身的任何信息。

函数代码中的R字节码引用

1 个答案: