[perl5.git] / plan9 / versnum

/define PERL_REVISION/ {revision = $3}
/define PERL_VERSION/ {version = $3}
/define PERL_SUBVERSION/ {subvers = $3}
END {
if (subvers == 0) 
	printf "p9pvers = %d.%d\n", revision, version> "buildinfo";
else
	printf "p9pvers = %d.%d.%d\n" , revision, version, subvers> "buildinfo";
}
Commit	Line	Data
a123eb89 R	1	/define PERL_REVISION/ {revision = $3}
	2	/define PERL_VERSION/ {version = $3}
	3	/define PERL_SUBVERSION/ {subvers = $3}
760ac839 LW	4	END {
760ac839 LW	5	if (subvers == 0)
a123eb89	6	printf "p9pvers = %d.%d\n", revision, version> "buildinfo";
760ac839	7	else
a123eb89	8	printf "p9pvers = %d.%d.%d\n" , revision, version, subvers> "buildinfo";
760ac839	9	}