从Fortran调用R的错误函数

Question

如何从Fortran调用R的内置函数'error'和'warning'？从C开始是直截了当的，但如果我使用像

这样的东西

call error('an error occured')

在我的Fortran代码中，由于“未定义的符号：error_”，动态库将无法加载。我可以看到R CMD SHLIB命令与-lR链接，那么还需要什么呢？从Fortran调用时，它们可能有不同的名称吗？

Answer 1

根据Writing R Extensions手册，

  

提供了两个接口函数来调用来自FORTRAN代码的错误和警告，在每种情况下都有一个简单的字符串参数。它们被定义为：

subroutine rexit(message)
subroutine rwarn(message)

  

超过255个字符的邮件将被截断，并显示警告。