This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Further ANSI changes now builds and passes (most) tests
[perl5.git] / ext / attrs / attrs.xs
index f34ac85..dae612a 100644 (file)
@@ -3,8 +3,7 @@
 #include "XSUB.h"
 
 static cv_flags_t
-get_flag(attr)
-char *attr;
+get_flag(char *attr)
 {
     if (strnEQ(attr, "method", 6))
        return CVf_METHOD;
@@ -17,8 +16,8 @@ char *attr;
 MODULE = attrs         PACKAGE = attrs
 
 void
-import(class, ...)
-char * class
+import(Class, ...)
+char * Class
     ALIAS:
        unimport = 1
     PREINIT: