Displaying 2 results from an estimated 2 matches for "getdecl2".
Did you mean:
getdecl
2024 Jul 29
1
Minor inconsistencies in tools:::funAPI()
..._FORMAT(1,2 but we don't care
> # finally terminated by semicolon
> ;
> }"
>
> regmatches(lines, gregexec(rx, lines, perl = TRUE))[[1]][3,]
> }
>
> # Preprocess then extract remapped function names like getFunsHdr
> getdecl2 <- function(file)
> file |>
> readLines() |>
> grep('^\\s*#\\s*error', x = _, value = TRUE, invert = TRUE) |>
> tools:::ccE() |>
> getdecl(lines = _)
>
> --
> Best regards,
> Ivan
>
> ___________________...
2024 Jul 15
1
Minor inconsistencies in tools:::funAPI()
...nside parentheses
\s* \( (.*?) \) \s* # using dotall here
# will include R_PRINTF_FORMAT(1,2 but we don't care
# finally terminated by semicolon
;
}"
regmatches(lines, gregexec(rx, lines, perl = TRUE))[[1]][3,]
}
# Preprocess then extract remapped function names like getFunsHdr
getdecl2 <- function(file)
file |>
readLines() |>
grep('^\\s*#\\s*error', x = _, value = TRUE, invert = TRUE) |>
tools:::ccE() |>
getdecl(lines = _)
--
Best regards,
Ivan