这是在以下问题的上下文中
但不是在函数顶部添加注释,我需要在模板中添加它。
像@param[in] pChainCtrl
/**
********************************************************************************
* @fn ChainCtrlInitChains
* @brief
* @param[in ] # need to add arguments here
* @return
********************************************************************************
*/
eErrorT ChainCtrlInitChains(ChainCtrlT* pChainCtrl,
char* name,
int instance,
void* pOwner,
)
{
....
}
.........
我的代码来自用户@Joseph 的输入,它在函数定义上方但不在模板内部添加参数
use File::Copy;
open my $FILE,'<','a.c' or die "open failed: $!\n";
open my $FILE1,'>','b.c' or die "open failed: $!\n";
$file_slurp = do { local $/;<$FILE>};
$file_slurp =~ s{ ^ ( \w+ \s+ \w+ \s* \( (.+?) \) )}{&print_args($2,$1)}xmesg;
print $FILE1 $file_slurp;
close($FILE);
close($FILE1);
sub print_args {
($args,$proto) = @_;
@arr = map /(\w+)$/, split /\W*?,\W*/, $args;
@comments = map ' * @param[in/out] '."$_", @arr;
return join "\n",(@comments,$proto)
}