| kernel-doc (47ae7aed34ee9017e9eeb2ad066786239456a90f) | kernel-doc (f3341dcf3bdcd1209b2911f35e4e970b789c4744) |
|---|---|
| 1#!/usr/bin/perl -w 2 3use strict; 4 5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ## 6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ## 7## Copyright (C) 2001 Simon Huggins ## 8## Copyright (C) 2005-2012 Randy Dunlap ## --- 200 unchanged lines hidden (view full) --- 209my $type_param = '\@(\w+)'; 210my $type_struct = '\&((struct\s*)*[_\w]+)'; 211my $type_struct_xml = '\\&((struct\s*)*[_\w]+)'; 212my $type_env = '(\$\w+)'; 213my $type_enum_full = '\&(enum)\s*([_\w]+)'; 214my $type_struct_full = '\&(struct)\s*([_\w]+)'; 215my $type_typedef_full = '\&(typedef)\s*([_\w]+)'; 216my $type_union_full = '\&(union)\s*([_\w]+)'; | 1#!/usr/bin/perl -w 2 3use strict; 4 5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ## 6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ## 7## Copyright (C) 2001 Simon Huggins ## 8## Copyright (C) 2005-2012 Randy Dunlap ## --- 200 unchanged lines hidden (view full) --- 209my $type_param = '\@(\w+)'; 210my $type_struct = '\&((struct\s*)*[_\w]+)'; 211my $type_struct_xml = '\\&((struct\s*)*[_\w]+)'; 212my $type_env = '(\$\w+)'; 213my $type_enum_full = '\&(enum)\s*([_\w]+)'; 214my $type_struct_full = '\&(struct)\s*([_\w]+)'; 215my $type_typedef_full = '\&(typedef)\s*([_\w]+)'; 216my $type_union_full = '\&(union)\s*([_\w]+)'; |
| 217my $type_member = '\&([_\w]+)((\.|->)[_\w]+)'; 218my $type_member_func = $type_member . '\(\)'; |
|
| 217 218# Output conversion substitutions. 219# One for each output format 220 221# these work fairly well 222my @highlights_html = ( 223 [$type_constant, "<i>\$1</i>"], 224 [$type_func, "<b>\$1</b>"], --- 52 unchanged lines hidden (view full) --- 277 [$type_struct, "\$1"], 278 [$type_param, "\$1"] 279 ); 280my $blankline_text = ""; 281 282# rst-mode 283my @highlights_rst = ( 284 [$type_constant, "``\$1``"], | 219 220# Output conversion substitutions. 221# One for each output format 222 223# these work fairly well 224my @highlights_html = ( 225 [$type_constant, "<i>\$1</i>"], 226 [$type_func, "<b>\$1</b>"], --- 52 unchanged lines hidden (view full) --- 279 [$type_struct, "\$1"], 280 [$type_param, "\$1"] 281 ); 282my $blankline_text = ""; 283 284# rst-mode 285my @highlights_rst = ( 286 [$type_constant, "``\$1``"], |
| 287 # Note: need to escape () to avoid func matching later 288 [$type_member_func, "\\:c\\:type\\:`\$1\$2\\\\(\\\\) <\$1>`"], 289 [$type_member, "\\:c\\:type\\:`\$1\$2 <\$1>`"], |
|
| 285 [$type_func, "\\:c\\:func\\:`\$1()`"], 286 [$type_struct_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 287 [$type_enum_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 288 [$type_typedef_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 289 [$type_union_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 290 # in rst this can refer to any type 291 [$type_struct, "\\:c\\:type\\:`\$1`"], 292 [$type_param, "**\$1**"] --- 2730 unchanged lines hidden --- | 290 [$type_func, "\\:c\\:func\\:`\$1()`"], 291 [$type_struct_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 292 [$type_enum_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 293 [$type_typedef_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 294 [$type_union_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 295 # in rst this can refer to any type 296 [$type_struct, "\\:c\\:type\\:`\$1`"], 297 [$type_param, "**\$1**"] --- 2730 unchanged lines hidden --- |