Fix C< $x=''; pos($x)=0; $x=~/\G$/ >
[perl.git] / plan9 / fndvers
1 #!/bin/rc
2
3 . plan9/buildinfo
4
5 ed plan9/config.plan9 <<!
6 g/_P9P_VERSION/s//$p9pvers/g
7 g/_P9P_OBJTYPE/s//$objtype/g
8 w config.h
9 !
10
11 ed plan9/genconfig.pl<<!
12 g/_P9P_VERSION/s//$p9pvers/g
13 w plan9/genconfig.pl
14 !