Displaying 6 results from an estimated 6 matches for "needval".
1997 Jun 03
0
R-alpha: rd2sd v0.1
...e saved as comments, and can easily be used as soon as
keywords are supported.
As usual, any feedback ...
-k
**********************************************************************
#!/usr/bin/perl -w
$VERSION = "0.1";
$\ = "\n";
$parenLevel = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$seealso = 0;
$output = "";
while (<>) {
chop;
&substitute;
@word = split;
if (/^[^.]/) { &output($_); }
if (/^\.AG/) {
if ($needArg) {
§ion(0, "ARGUMENTS(");
$needArg = 0;
}
§ion(1, "ARG($word[1] @@&quo...
1997 Aug 04
0
R-alpha: sd2rd version 0.1-5
Oops,
Just found a typo. Here's the updated version.
-k
***********************************************************************
#!/usr/bin/perl
$VERSION = "0.1-5";
$\ = "\n";
$parenLevel = 0;
$inVerbatim = 0;
$inSeeAlso = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$output = "";
use Getopt::Long;
GetOptions (("x")) || &usage();
while (<>) {
chop;
&substitute unless /^\./;
@word = split;
if (/^\s*$/) {
if ($inVerbatim) {
&output("BLANK");
} else {
&output("PARA");...
1997 Jun 02
1
R-alpha: S doc -> R doc
...uments lists right, distinguish between VALUE and
VALUES, and know about REFERENCES and SEEALSO).
Any comments etc are most welcome.
-k
************************************************************************
#!/usr/bin/perl -w
$\ = "\n";
$parenLevel = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$output = "";
while (<>) {
chop;
&substitute;
@word = split;
if (/^[^.]/) { &output($_); }
if (/^\.AG/) {
if ($needArg) {
§ion(0, "ARGUMENTS(");
$needArg = 0;
}
§ion(1, "ARG($word[1] @@");
}...
1997 Jun 09
1
R-alpha: sd2rd v0.1-1
...sections come
out better
*) comments are mapped into comments :-)
Please have a try.
-k
************************************************************************
#!/usr/bin/perl -w
$VERSION = "0.1-1";
$\ = "\n";
$parenLevel = 0;
$inSeeAlso = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$output = "";
while (<>) {
chop;
&substitute unless /^\./;
@word = split;
if (/^\s*$/) { &output("PARA"); }
if (/^[^.]/) { &output($_); }
if (/^\.AG/) {
if ($needArg) {
§ion(0, "ARGUMENTS(");
$needArg...
1997 Jul 01
1
R-alpha: sd2rd v0.1-3
...f the S doc -> R doc script.
It now correctly maps .SE into SECTION.
-k
***********************************************************************
#!/usr/bin/perl -w
$VERSION = "0.1-3";
$\ = "\n";
$parenLevel = 0;
$inVerbatim = 0;
$inSeeAlso = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$output = "";
$opt_x = 0;
use Getopt::Long;
GetOptions (("x")) || &usage();
while (<>) {
chop;
&substitute unless /^\./;
@word = split;
if (/^\s*$/) {
if ($inVerbatim) {
&output("BLANK");
} else {
&output("...
1997 Jun 10
0
R-alpha: sd2rd 0.1-2
...ps one could include it in the R distribution's `etc' directory.
-k
*********************************************************************
#!/usr/bin/perl -w
$VERSION = "0.1-2";
$\ = "\n";
$parenLevel = 0;
$inVerbatim = 0;
$inSeeAlso = 0;
$doprint = 1;
$needArg = 1;
$needVal = 0;
$output = "";
$opt_x = 0;
use Getopt::Long;
GetOptions (("x")) || &usage();
while (<>) {
chop;
&substitute unless /^\./;
@word = split;
if (/^\s*$/) {
if ($inVerbatim) {
&output("BLANK");
} else {
&output("...