kernel-doc (5449bc94152a6c4700f46786be600141234d8f0f) | kernel-doc (891dcd2f7ab15e2aaad07f6925b3a53fd8d5c02f) |
---|---|
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## ## --- 69 unchanged lines hidden (view full) --- 78# (*)?*/ 79# 80# So .. the trivial example would be: 81# 82# /** 83# * my_function 84# **/ 85# | 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## ## --- 69 unchanged lines hidden (view full) --- 78# (*)?*/ 79# 80# So .. the trivial example would be: 81# 82# /** 83# * my_function 84# **/ 85# |
86# If the Description: header tag is ommitted, then there must be a blank line | 86# If the Description: header tag is omitted, then there must be a blank line |
87# after the last parameter specification. 88# e.g. 89# /** 90# * my_function - does my stuff 91# * @my_arg: its mine damnit 92# * 93# * Does my stuff explained. 94# */ --- 165 unchanged lines hidden (view full) --- 260my $decl_type; 261 262my $doc_special = "\@\%\$\&"; 263 264my $doc_start = '^/\*\*\s*$'; # Allow whitespace at end of comment start. 265my $doc_end = '\*/'; 266my $doc_com = '\s*\*\s*'; 267my $doc_decl = $doc_com.'(\w+)'; | 87# after the last parameter specification. 88# e.g. 89# /** 90# * my_function - does my stuff 91# * @my_arg: its mine damnit 92# * 93# * Does my stuff explained. 94# */ --- 165 unchanged lines hidden (view full) --- 260my $decl_type; 261 262my $doc_special = "\@\%\$\&"; 263 264my $doc_start = '^/\*\*\s*$'; # Allow whitespace at end of comment start. 265my $doc_end = '\*/'; 266my $doc_com = '\s*\*\s*'; 267my $doc_decl = $doc_com.'(\w+)'; |
268my $doc_sect = $doc_com.'(['.$doc_special.']?[\w ]+):(.*)'; | 268my $doc_sect = $doc_com.'(['.$doc_special.']?[\w\s]+):(.*)'; |
269my $doc_content = $doc_com.'(.*)'; 270my $doc_block = $doc_com.'DOC:\s*(.*)?'; 271 272my %constants; 273my %parameterdescs; 274my @parameterlist; 275my %sections; 276my @sectionlist; --- 1644 unchanged lines hidden --- | 269my $doc_content = $doc_com.'(.*)'; 270my $doc_block = $doc_com.'DOC:\s*(.*)?'; 271 272my %constants; 273my %parameterdescs; 274my @parameterlist; 275my %sections; 276my @sectionlist; --- 1644 unchanged lines hidden --- |