diff options
Diffstat (limited to 'regen')
| -rwxr-xr-x | regen/embed.pl | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/regen/embed.pl b/regen/embed.pl index 33967c984e..9f8a07af30 100755 --- a/regen/embed.pl +++ b/regen/embed.pl @@ -92,13 +92,16 @@ my ($embed, $core, $ext, $api) = setup_embed(); $func = "S_$plain_func"; } else { - if($never_returns){ - $retval = "PERL_CALLCONV_NO_RET $splint_flags$retval"; - }else{ - $retval = "PERL_CALLCONV $splint_flags$retval"; - }if ($flags =~ /[bp]/) { + if ($never_returns) { + $retval = "PERL_CALLCONV_NO_RET $splint_flags$retval"; + } + else { + $retval = "PERL_CALLCONV $splint_flags$retval"; + } + if ($flags =~ /[bp]/) { $func = "Perl_$plain_func"; - } else { + } + else { $func = $plain_func; } } |