[svn:parrot] r9587 - trunk/config/inter

[fperrad]

Author: fperrad
Date: Thu Oct 27 00:24:53 2005
New Revision: 9587

Modified:
   trunk/config/inter/lex.pl
   trunk/config/inter/yacc.pl
Log:
bison & flex version in string format

Modified: trunk/config/inter/lex.pl
==============================================================================
--- trunk/config/inter/lex.pl   (original)
+++ trunk/config/inter/lex.pl   Thu Oct 27 00:24:53 2005
@@ -75,7 +75,7 @@ sub runstep {
     # if '--version' returns a string assume that this is flex.
     # flex calls it self by $0 so it will claim to be lex if invoked as `lex`
     if ($stdout =~ /f?lex .*? (\d+) \. (\d+) \. (\d+)/x) {
-        Configure::Data->set(flex_version => [$1, $2, $3]);
+        Configure::Data->set(flex_version => "$1.$2.$3");
     }
 
     Configure::Data->set($util => $prog);

Modified: trunk/config/inter/yacc.pl
==============================================================================
--- trunk/config/inter/yacc.pl  (original)
+++ trunk/config/inter/yacc.pl  Thu Oct 27 00:24:53 2005
@@ -75,7 +75,7 @@ sub runstep {
     # if '--version' returns a string assume that this is bison.
     # if this is bison pretending to be yacc '--version' doesn't work
     if ($stdout =~ /Bison .*? (\d+) \. (\d+) (\w)? /x) {
-        Configure::Data->set(bison_version => [$1, $2, $3]);
+        Configure::Data->set(bison_version => $3 ? "$1.$2$3" : "$1.$2");
     }
 
     Configure::Data->set($util => $prog);