SCM

SCM Repository

[inlinedocs] Diff of /pkg/inlinedocs/R/parsers.R
ViewVC logotype

Diff of /pkg/inlinedocs/R/parsers.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 303, Tue Jul 19 15:35:23 2011 UTC revision 304, Tue Jul 19 17:03:18 2011 UTC
# Line 131  Line 131 
131    for(i in seq_along(starts)){    for(i in seq_along(starts)){
132      start <- clines[starts[i]]      start <- clines[starts[i]]
133      end <- clines[ends[i]]      end <- clines[ends[i]]
134      lab <- if(all(gsub("[ }]","",src[(end+1):length(src)])==""))"value"      processed <- gsub("#.*","",gsub("[ }]","",src[(end+1):length(src)]))
135        lab <- if(all(processed==""))"value"
136      else if(start==2)"description"      else if(start==2)"description"
137      else if(is.arg()){      else if(is.arg()){
138        ##twutz: strip leading white spaces and brackets and ,        ##twutz: strip leading white spaces and brackets and ,

Legend:
Removed from v.303  
changed lines
  Added in v.304

R-Forge@R-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge