This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perlio.c: false Coverity finding (it cannot see that two pointers are the same):...
[perl5.git] / cflags.SH
index 5a6a706..6c26025 100755 (executable)
--- a/cflags.SH
+++ b/cflags.SH
@@ -165,6 +165,10 @@ Intel*) ;;
     ;;
 esac
 
+if test -f .patch; then
+  ccflags="-DPERL_PATCHNUM=`cat .patch` $ccflags"
+fi
+
     : Can we perhaps use $ansi2knr here
     echo "$cc -c -DPERL_CORE $ccflags $optimize $warn"
     eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"'