Lines Matching refs:arg

1791 	foreach my $arg (split ',', $members) {
1792 	    $arg =~ s/^\s*(\w+).*/$1/;
1793 	    push @parameterlist, $arg;
1794 	    if (!$parameterdescs{$arg}) {
1795 		$parameterdescs{$arg} = $undescribed;
1796 		print STDERR "Warning(${file}:$.): Enum value '$arg' ".
1867     foreach my $arg (split($splitter, $args)) {
1869 	$arg =~ s/\/\*.*\*\///;
1871 	$arg =~ s/^\s*//;
1872 	$arg =~ s/\s*$//;
1873 	$arg =~ s/\s+/ /;
1875 	if ($arg =~ /^#/) {
1879 	    push_parameter($arg, "", $file);
1880 	} elsif ($arg =~ m/\(.+\)\s*\(/) {
1882 	    $arg =~ tr/#/,/;
1883 	    $arg =~ m/[^\(]+\(\*?\s*(\w*)\s*\)/;
1885 	    $type = $arg;
1889 	} elsif ($arg) {
1890 	    $arg =~ s/\s*:\s*/:/g;
1891 	    $arg =~ s/\s*\[/\[/g;
1893 	    my @args = split('\s*,\s*', $arg);