| kernel-doc (a7291e7e03f8b45a4b028a410063dc94f9bff8c0) | kernel-doc (47ae7aed34ee9017e9eeb2ad066786239456a90f) |
|---|---|
| 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 ## --- 198 unchanged lines hidden (view full) --- 207my $type_constant = '\%([-_\w]+)'; 208my $type_func = '(\w+)\(\)'; 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]+)'; | 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 ## --- 198 unchanged lines hidden (view full) --- 207my $type_constant = '\%([-_\w]+)'; 208my $type_func = '(\w+)\(\)'; 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]+)'; |
|
| 215 216# Output conversion substitutions. 217# One for each output format 218 219# these work fairly well 220my @highlights_html = ( 221 [$type_constant, "<i>\$1</i>"], 222 [$type_func, "<b>\$1</b>"], --- 55 unchanged lines hidden (view full) --- 278my $blankline_text = ""; 279 280# rst-mode 281my @highlights_rst = ( 282 [$type_constant, "``\$1``"], 283 [$type_func, "\\:c\\:func\\:`\$1()`"], 284 [$type_struct_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], 285 [$type_enum_full, "\\:c\\:type\\:`\$1 \$2 <\$2>`"], | 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>"], --- 55 unchanged lines hidden (view full) --- 280my $blankline_text = ""; 281 282# rst-mode 283my @highlights_rst = ( 284 [$type_constant, "``\$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>`"], |
|
| 286 # in rst this can refer to any type 287 [$type_struct, "\\:c\\:type\\:`\$1`"], 288 [$type_param, "**\$1**"] 289 ); 290my $blankline_rst = "\n"; 291 292# list mode 293my @highlights_list = ( --- 2725 unchanged lines hidden --- | 290 # in rst this can refer to any type 291 [$type_struct, "\\:c\\:type\\:`\$1`"], 292 [$type_param, "**\$1**"] 293 ); 294my $blankline_rst = "\n"; 295 296# list mode 297my @highlights_list = ( --- 2725 unchanged lines hidden --- |