This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Plan9/9front i386 fixes
[perl5.git] / plan9 / versnum
index 6e579f3..55f80d0 100644 (file)
@@ -1,8 +1,9 @@
-/PERL_VERSION/ {base = $3}
-/PERL_SUBVERSION/ {subvers = $3}
+/define PERL_REVISION/ {revision = $3}
+/define PERL_VERSION/ {version = $3}
+/define PERL_SUBVERSION/ {subvers = $3}
 END {
 if (subvers == 0) 
-       printf "p9pvers = 5.%03d\n", base> "buildinfo";
+       printf "p9pvers = %d.%d\n", revision, version> "buildinfo";
 else
-       printf "p9pvers = 5.%03d_%02d\n" , base, subvers> "buildinfo";
+       printf "p9pvers = %d.%d.%d\n" , revision, version, subvers> "buildinfo";
 }