This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix K&R-style function declaration.
authorCraig A. Berry <craigberry@mac.com>
Fri, 3 Dec 2010 04:20:41 +0000 (22:20 -0600)
committerCraig A. Berry <craigberry@mac.com>
Fri, 3 Dec 2010 04:20:41 +0000 (22:20 -0600)
vms/vms.c

index ab71db2..3aa93e2 100644 (file)
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -12446,8 +12446,7 @@ static mydev_t encode_dev (pTHX_ const char *dev)
 #endif
 
 static int
-is_null_device(name)
-    const char *name;
+is_null_device(const char *name)
 {
   if (decc_bug_devnull != 0) {
     if (strncmp("/dev/null", name, 9) == 0)