kernel-doc (2612e3bbc0386368a850140a6c9b990cd496a5ec) | kernel-doc (be98edcb664be76cd3ba0bde1e760a31197176d8) |
---|---|
1#!/usr/bin/env perl 2# SPDX-License-Identifier: GPL-2.0 3 4use warnings; 5use strict; 6 7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ## 8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ## --- 1154 unchanged lines hidden (view full) --- 1163 # replace DECLARE_HASHTABLE 1164 $members =~ s/DECLARE_HASHTABLE\s*\($args,\s*$args\)/unsigned long $1\[1 << (($2) - 1)\]/gos; 1165 # replace DECLARE_KFIFO 1166 $members =~ s/DECLARE_KFIFO\s*\($args,\s*$args,\s*$args\)/$2 \*$1/gos; 1167 # replace DECLARE_KFIFO_PTR 1168 $members =~ s/DECLARE_KFIFO_PTR\s*\($args,\s*$args\)/$2 \*$1/gos; 1169 # replace DECLARE_FLEX_ARRAY 1170 $members =~ s/(?:__)?DECLARE_FLEX_ARRAY\s*\($args,\s*$args\)/$1 $2\[\]/gos; | 1#!/usr/bin/env perl 2# SPDX-License-Identifier: GPL-2.0 3 4use warnings; 5use strict; 6 7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ## 8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ## --- 1154 unchanged lines hidden (view full) --- 1163 # replace DECLARE_HASHTABLE 1164 $members =~ s/DECLARE_HASHTABLE\s*\($args,\s*$args\)/unsigned long $1\[1 << (($2) - 1)\]/gos; 1165 # replace DECLARE_KFIFO 1166 $members =~ s/DECLARE_KFIFO\s*\($args,\s*$args,\s*$args\)/$2 \*$1/gos; 1167 # replace DECLARE_KFIFO_PTR 1168 $members =~ s/DECLARE_KFIFO_PTR\s*\($args,\s*$args\)/$2 \*$1/gos; 1169 # replace DECLARE_FLEX_ARRAY 1170 $members =~ s/(?:__)?DECLARE_FLEX_ARRAY\s*\($args,\s*$args\)/$1 $2\[\]/gos; |
1171 #replace DEFINE_DMA_UNMAP_ADDR 1172 $members =~ s/DEFINE_DMA_UNMAP_ADDR\s*\($args\)/dma_addr_t $1/gos; 1173 #replace DEFINE_DMA_UNMAP_LEN 1174 $members =~ s/DEFINE_DMA_UNMAP_LEN\s*\($args\)/__u32 $1/gos; |
|
1171 my $declaration = $members; 1172 1173 # Split nested struct/union elements as newer ones 1174 while ($members =~ m/$struct_members/) { 1175 my $newmember; 1176 my $maintype = $1; 1177 my $ids = $4; 1178 my $content = $3; --- 1343 unchanged lines hidden --- | 1175 my $declaration = $members; 1176 1177 # Split nested struct/union elements as newer ones 1178 while ($members =~ m/$struct_members/) { 1179 my $newmember; 1180 my $maintype = $1; 1181 my $ids = $4; 1182 my $content = $3; --- 1343 unchanged lines hidden --- |