[Roxygen-commits] r129 - in pkg: R sandbox

[noreply at r-forge.r-project.org]

Author: pcd
Date: 2008-07-29 06:26:58 +0200 (Tue, 29 Jul 2008)
New Revision: 129

Added:
   pkg/R/callgraph.R
Modified:
   pkg/sandbox/callgraph.R
Log:
callgraph stub


Added: pkg/R/callgraph.R
===================================================================
--- pkg/R/callgraph.R	                        (rev 0)
+++ pkg/R/callgraph.R	2008-07-29 04:26:58 UTC (rev 129)
@@ -0,0 +1,8 @@
+#' @include roxygen.R
+#' @include roclet.R
+roclet()
+
+make.callgraph.roclet <- function(outfile='',
+                                  verbose=TRUE) {
+  ## Need to abstract some parse.name stuff out of Rd
+}

Modified: pkg/sandbox/callgraph.R
===================================================================
--- pkg/sandbox/callgraph.R	2008-07-29 04:19:18 UTC (rev 128)
+++ pkg/sandbox/callgraph.R	2008-07-29 04:26:58 UTC (rev 129)
@@ -53,7 +53,7 @@
 exprofundum <- expression(roxygenize)
 
 discover.subcalls <- function(exprofundum,
-                              depth=6,
+                              depth=2,
                               include.primitives=FALSE)
   if (is.name(exprofundum)) {
     subcall <- as.character(exprofundum)
@@ -88,10 +88,10 @@
 preorder.walk.expression(discover.subcalls, exprofundum)
 
 formals(toFile) <- alist(graph=,
-                         layoutType = c("dot", "neato", "twopi",
+                         layoutType=c("dot", "neato", "twopi",
                            "circo", "fdp"),
                          filename=,
-                         fileType = c("canon", "dot", "xdot",
+                         fileType=c("canon", "dot", "xdot",
                            "dia", "fig", "gd", "gd2", "gif", "hpgl",
                            "imap", "cmapx", "ismap", "mif", "mp", "pcl",
                            "pdf", "pic", "plain", "plain-ext", "png", "ps",