kernel-doc (36a1818f5a1e50b805317ba13f827067d50f6970) kernel-doc (0ec69b3bed23a4a5a88b4261afeee44ade709ed3)
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3# vim: softtabstop=4
4
5use warnings;
6use strict;
7
8## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##

--- 1527 unchanged lines hidden (view full) ---

1536 unshift(@args, pop @first_arg);
1537 $type = join " ", @first_arg;
1538
1539 foreach $param (@args) {
1540 if ($param =~ m/^(\*+)\s*(.*)/) {
1541 save_struct_actual($2);
1542
1543 push_parameter($2, "$type $1", $arg, $file, $declaration_name);
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3# vim: softtabstop=4
4
5use warnings;
6use strict;
7
8## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##

--- 1527 unchanged lines hidden (view full) ---

1536 unshift(@args, pop @first_arg);
1537 $type = join " ", @first_arg;
1538
1539 foreach $param (@args) {
1540 if ($param =~ m/^(\*+)\s*(.*)/) {
1541 save_struct_actual($2);
1542
1543 push_parameter($2, "$type $1", $arg, $file, $declaration_name);
1544 } elsif ($param =~ m/(.*?):(\d+)/) {
1544 } elsif ($param =~ m/(.*?):(\w+)/) {
1545 if ($type ne "") { # skip unnamed bit-fields
1546 save_struct_actual($1);
1547 push_parameter($1, "$type:$2", $arg, $file, $declaration_name)
1548 }
1549 } else {
1550 save_struct_actual($param);
1551 push_parameter($param, $type, $arg, $file, $declaration_name);
1552 }

--- 989 unchanged lines hidden --- 		1545 if ($type ne "") { # skip unnamed bit-fields
1546 save_struct_actual($1);
1547 push_parameter($1, "$type:$2", $arg, $file, $declaration_name)
1548 }
1549 } else {
1550 save_struct_actual($param);
1551 push_parameter($param, $type, $arg, $file, $declaration_name);
1552 }

--- 989 unchanged lines hidden ---