[5957] parsetexi update

[Gavin D. Smith]

Revision: 5957
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=5957
Author:   gavin
Date:     2014-12-12 17:20:59 +0000 (Fri, 12 Dec 2014)
Log Message:
-----------
parsetexi update

Modified Paths:
--------------
    trunk/parsetexi/Parsetexi/lib/Parsetexi.pm
    trunk/parsetexi/README
    trunk/parsetexi/makeinfo
    trunk/parsetexi/test-files/hello.texi

Added Paths:
-----------
    trunk/parsetexi/ChangeLog

Added: trunk/parsetexi/ChangeLog
===================================================================
--- trunk/parsetexi/ChangeLog                           (rev 0)
+++ trunk/parsetexi/ChangeLog   2014-12-12 17:20:59 UTC (rev 5957)
@@ -0,0 +1,6 @@
+2014-12-12  Gavin Smith  <address@hidden>
+
+       * Parsetexi/lib/Parsetexi.pm (parse_texi_file): Set 
+       'input_file_name' in document information.  This allows running 
+       "./makeinfo test-files/hello.texi", and getting an output file 
+       "hello.info".

Modified: trunk/parsetexi/Parsetexi/lib/Parsetexi.pm
===================================================================
--- trunk/parsetexi/Parsetexi/lib/Parsetexi.pm  2014-12-11 20:22:42 UTC (rev 
5956)
+++ trunk/parsetexi/Parsetexi/lib/Parsetexi.pm  2014-12-12 17:20:59 UTC (rev 
5957)
@@ -204,6 +204,8 @@
   my $file_name = shift;
   my $tree_stream;
 
+  $self->{'info'}->{'input_file_name'} = $file_name;
+
   #print "Getting tree...\n";
 
   # Note we are calling a separate executable instead of using the code

Modified: trunk/parsetexi/README
===================================================================
--- trunk/parsetexi/README      2014-12-11 20:22:42 UTC (rev 5956)
+++ trunk/parsetexi/README      2014-12-12 17:20:59 UTC (rev 5957)
@@ -1,8 +1,7 @@
 This is an experimental program intended to replicate the functionality 
-in tp/Parser.pm.  How it will be integrated into makeinfo is still 
-unknown.
+in tp/Texinfo/Parser.pm.  How it will be integrated into makeinfo is 
+still unknown.
 
 makeinfo in this directory wraps texi2any-C.pl, which is tp/texi2any.pl 
 changed to use the module in the Parsetexi subdirectory instead of 
-Texinfo::Parser.  At the current state of development it has not 
-successfully processed any Texinfo input file.
+Texinfo::Parser.

Modified: trunk/parsetexi/makeinfo
===================================================================
--- trunk/parsetexi/makeinfo    2014-12-11 20:22:42 UTC (rev 5956)
+++ trunk/parsetexi/makeinfo    2014-12-12 17:20:59 UTC (rev 5957)
@@ -1,5 +1,6 @@
 #! /usr/bin/env bash
 
 #DEBUG=perl -d
+#OPTIONS='-c DEBUG=1'
 
-PERL5LIB=../tp:../tp/maintain/lib/libintl-perl/lib:../tp/maintain/lib/Text-Unidecode/lib/:../tp/maintain/lib/Unicode-EastAsianWidth/lib:./Parsetexi/lib:./Parsetexi/blib/lib:./Parsetexi/blib/arch/auto/Parsetexi
 ${DEBUG} ./texi2any-C.pl "$@"
+PERL5LIB=../tp:../tp/maintain/lib/libintl-perl/lib:../tp/maintain/lib/Text-Unidecode/lib/:../tp/maintain/lib/Unicode-EastAsianWidth/lib:./Parsetexi/lib:./Parsetexi/blib/lib:./Parsetexi/blib/arch/auto/Parsetexi
 ${DEBUG} ./texi2any-C.pl ${OPTIONS} "$@"

Modified: trunk/parsetexi/test-files/hello.texi
===================================================================
--- trunk/parsetexi/test-files/hello.texi       2014-12-11 20:22:42 UTC (rev 
5956)
+++ trunk/parsetexi/test-files/hello.texi       2014-12-12 17:20:59 UTC (rev 
5957)
@@ -1,6 +1,6 @@
 \input texinfo   @c -*-texinfo-*-
 @c %**start of header
address@hidden sample.info
address@hidden hello.info
 @settitle Sample Manual 1.0
 @c %**end of header