search for: nativesymbolinfo

Hi, When loading a package that provides the user-supplied RNG hook user_unif_rand, calling getNativeSymbolInfo("user_unif_rand") returns informations about the loaded symbol. I am using this to identify which package currently provides the RNG hook. The results are the same on windows and linux if only one library provides the hook. If one loads a second package that provides this hook, then on...

I use recordPlot() to save plots to disk that I render later to a variety of formats. This works fine for base R plots and ggplot2 plots, and also used to work for lattice plots. However somewhere in version 2.14 things stopped working for lattice plots. Here is an example: library(lattice); histogram(rnorm(100)); x <- recordPlot(); saveRDS(x, "myplot.rds"); y <-

...rror=expression(0)) > ## Call 'R_GD_nullDevice' with incorrect parameter count: > .Call("R_GD_nullDevice", 1) Error in .Call("R_GD_nullDevice", 1) : Incorrect number of arguments (1), expecting 0 for R_GD_nullDevice > > ## Same call made via a NativeSymbolInfo object: > sym <- getDLLRegisteredRoutines("grDevices")$.Call[["R_GD_nullDevice"]] > .Call(sym$address, 1) Error: 'getEncChar' must be called on a CHARSXP The error stems from the fact, that both do_External and do_dotcall expect CAR(args) to be a string,...

...common /myparms/pars call odeparms(19, pars) return end $ R CMD SHLIB Aquaphy.f gfortran -fpic -g -O2 -c test.f -o test.o gcc -std=gnu99 -shared -L/usr/local/lib -o test.so test.o -lgfortran -lm and linked into the package dll (or so). Help for is.loaded() and getNativeSymbolInfo() say not to use symbol.For() to convert to Fortran-specific symbols. However, on Linux, getNativeSymbolInfo is unable to find 'initaquaphy' in 'test.so', but does find 'initaquaphy_'. Note that is.loaded() works as advertised. Furthermore, this code works in Windows, R-2...

...use case with tcltk-package where I need to repeatedly call Tcl/Tk functions very quickly. For such purpose, the standard R-interface turned out to be too slow, and better option has been to call package's C-function dotTcl directly from my own C-code. Before R 4.4.0 it was possible to use getNativeSymbolInfo("dotTcl","tcltk")$address (or R_FindSymbol("dotTcl","tcltk",NULL) in C) to get the function-pointer and then call the function directly, even though it has not been registered as C-callable for other packages. With R 4.4.0 these methods are unable to find t...

Dear all, I’m not sure if it is O.K. to ask this question here. But where can I find the code for the function ‘C_Cdqrls’ which is called by the R function ‘lsfit‘. Thank you all. Sorry for being naïve if so. -------------------- Ziqiang Zhao 2013-04-23 [[alternative HTML version deleted]]

I asked Tomas. Apparently this works: getNativeSymbolInfo("dotTcl",PACKAGE=getLoadedDLLs()$tcltk) and the tcltk behavior was changed by r84265 | hornik | 2023-04-15 08:44:36 +0200 (Sat, 15 Apr 2023) | 1 line Try forcing symbols in ff calls. Index: library/tcltk/src/init.c ===================================================================...

...tric distributions for all 2 by 2 tables. This might be slightly slower for a few cases, but works much better for tables with some large counts. There is a new option to simulate the p-value for larger than 2 x 2 tables. o for() now supports raw vectors as the set of indices. o getNativeSymbolInfo() is vectorized for the 'name' argument. It returns a named list of NativeSymbolInfo objects, but is backward compatible by default when called with a character vector of length 1, returning the NativeSymbolInfo object. o help.search() no longer attempts to handle packages installe...

...tric distributions for all 2 by 2 tables. This might be slightly slower for a few cases, but works much better for tables with some large counts. There is a new option to simulate the p-value for larger than 2 x 2 tables. o for() now supports raw vectors as the set of indices. o getNativeSymbolInfo() is vectorized for the 'name' argument. It returns a named list of NativeSymbolInfo objects, but is backward compatible by default when called with a character vector of length 1, returning the NativeSymbolInfo object. o help.search() no longer attempts to handle packages installe...

...r index, the extracted part was not marked for duplication on change. (PR#13411) o Assigning an additional element to a pairlist/language element by x[["foo"]] <- value did not name the additional element. o .Call() and .External() were not accepting "NativeSymbolInfo" and "NativeSymbol" objects as claimed. (Patch from Olaf Mersmann.) o codoc() was missing some default value mismatches with unescaped backslashes, e.g. final="\\" needs to be written as final="\\\\" in the Rd file....

...r index, the extracted part was not marked for duplication on change. (PR#13411) o Assigning an additional element to a pairlist/language element by x[["foo"]] <- value did not name the additional element. o .Call() and .External() were not accepting "NativeSymbolInfo" and "NativeSymbol" objects as claimed. (Patch from Olaf Mersmann.) o codoc() was missing some default value mismatches with unescaped backslashes, e.g. final="\\" needs to be written as final="\\\\" in the Rd file....