findSourceTraceback
From R.utils v1.26.2
by Henrik Bengtsson
Finds all 'srcfile' objects generated by source() in all call frames
Finds all 'srcfile' objects generated by source() in all call frames. This makes it possible to find out which files are
currently scripted by source
().
- Keywords
- programming, IO
Usage
## S3 method for class 'default':
findSourceTraceback(...)
Arguments
- ...
- Not used.
Value
See Also
See also sourceutils
.
Examples
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# Create two R script files where one source():s the other
# and both lists the traceback of filenames source():d.
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
path <- tempdir();
pathnameA <- Arguments$getWritablePathname("foo.R", path=path);
pathnameB <- Arguments$getWritablePathname("bar.R", path=path);
code <- 'cat("BEGIN foo.R
")';
code <- c(code, 'print(findSourceTraceback());');
code <- c(code, sprintf('source("%s");', pathnameB));
code <- c(code, 'cat("END foo.R
")');
code <- paste(code, collapse="");
cat(file=pathnameA, code);
code <- 'cat("BEGIN bar.R
")';
code <- c(code, 'x <- findSourceTraceback();');
code <- c(code, 'print(x);');
code <- c(code, 'cat("END bar.R
")');
code <- paste(code, collapse="");
cat(file=pathnameB, code);
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# Source the first file
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
source(pathnameA, echo=TRUE);
Community examples
Looks like there are no examples yet.