X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=h2pl%2Fgetioctlsizes;h=403fffaf86cef3f79cdbba0936d790b360920894;hb=dd629d5bb3bd7014585b7aad3c6715a5011673bc;hp=b7d4a0dfb5545fb593a7feb6869d139635293f2b;hpb=154e51a4a1b0258759b5e901183403af515a35b9;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/h2pl/getioctlsizes b/h2pl/getioctlsizes
index b7d4a0d..403fffa 100644
--- a/h2pl/getioctlsizes
+++ b/h2pl/getioctlsizes
@@ -3,7 +3,7 @@
 open (IOCTLS,'/usr/include/sys/ioctl.h') || die "ioctl open failed";
 
 while (<IOCTLS>) {
-    if (/^\s*#\s*define\s+\w+\s+_IO(R|W|WR)\(\w+,\s*\w+,\s*([^)]+)/) {
+    if (/^\s*#\s*define\s+\w+\s+_IO(R|W|WR)\('?\w+'?,\s*\w+,\s*([^)]+)/) {
 	$need{$2}++;
     } 
 }