summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2007-12-21 16:31:45 +0000
committerSteve Peters <steve@fisharerojo.org>2007-12-21 16:31:45 +0000
commitf05ddbb84c8a4ed2946b342346f3db3e986bcb33 (patch)
tree7cc980bec5b60fc3fa1c1d24d827d88f2fd99683 /lib
parentaab391487e4ce7ac2d97b35a504de2697fadd1b6 (diff)
downloadperl-f05ddbb84c8a4ed2946b342346f3db3e986bcb33.tar.gz
Clean up a warning with -Wwrite-strings that gets passed into every
parsed XS file. p4raw-id: //depot/perl@32691
Diffstat (limited to 'lib')
-rw-r--r--lib/ExtUtils/ParseXS.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/ParseXS.pm b/lib/ExtUtils/ParseXS.pm
index 221d5a43b8..e7e6aadbdf 100644
--- a/lib/ExtUtils/ParseXS.pm
+++ b/lib/ExtUtils/ParseXS.pm
@@ -940,7 +940,7 @@ EOF
#-Wall: if there is no $Full_func_name there are no xsubs in this .xs
#so `file' is unused
print Q(<<"EOF") if $Full_func_name;
-# char* file = __FILE__;
+# const char* file = __FILE__;
EOF
print Q("#\n");