diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-02 04:47:10 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-02 04:47:10 +0000 |
| commit | 20ce7b12268a3d32b5b246928de5084322e709cf (patch) | |
| tree | 395ce45dee07dabd92553cbcdad9b91e37e8ae49 /vms/writemain.pl | |
| parent | 0221c164222f9d91820826506118f46ffa08dd46 (diff) | |
| download | perl-20ce7b12268a3d32b5b246928de5084322e709cf.tar.gz | |
remove _() non-ansism
p4raw-id: //depot/perl@3518
Diffstat (limited to 'vms/writemain.pl')
| -rw-r--r-- | vms/writemain.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/writemain.pl b/vms/writemain.pl index 63091076ea..b08bf1d924 100644 --- a/vms/writemain.pl +++ b/vms/writemain.pl @@ -50,7 +50,7 @@ if (@exts) { foreach $ext (@exts) { my($subname) = $ext; $subname =~ s/::/__/g; - print OUT "extern void boot_${subname} _((CV* cv));\n" + print OUT "extern void boot_${subname} (CV* cv);\n" } # May not actually be a declaration, so put after other declarations print OUT " dXSUB_SYS;\n"; |