Add a new test for overloading.pm

[p5sagit/p5-mst-13.2.git] / cflags.SH

diff --git a/cflags.SH b/cflags.SH
index 6e6e8a9..80b50b1 100755 (executable)
--- a/cflags.SH
+++ b/cflags.SH
@@ -297,12 +297,12 @@ for file do
     opmini) ;;
     pad) ;;
     perl) 
-        if [ -f .patchnum -a -n "$(cat .patchnum)" ] ; then
-                ccflags="-DPERL_PATCHNUM=`cat .patchnum` $ccflags"
-        fi
-        if [ -f .sha1 -a -n "$(cat .sha1)" ] ; then
-                ccflags="-DPERL_GIT_SHA1=`cat .sha1` $ccflags"
+        if [ -f .patchnum -a -n "`awk 'BEGIN{ORS=""} /describe:/ {print $1}' .patchnum`" ] ; then
+                ccflags="-DPERL_PATCHNUM=`awk 'BEGIN{ORS=""} /describe:/ {print $2}' .patchnum` $ccflags"
         fi
+       if [ -f .patchnum -a -n "`awk 'BEGIN{ORS=""} /status:/ {print $2}' .patchnum`" ] ; then
+                ccflags="-DPERL_GIT_UNCOMMITTED_CHANGES=`awk 'BEGIN{ORS=""} /status:/ {print $2}' .patchnum` $ccflags"
+       fi
         ;;
     perlapi) ;;
     perlmain) ;;