summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOlly Betts <olly@survex.com>2009-07-15 07:43:16 +0000
committerOlly Betts <olly@survex.com>2009-07-15 07:43:16 +0000
commitc1399658ff2623f4910a08499240a464ef43d180 (patch)
treee4e1072017f75f791f4bbcdf5b8dc3b2ab22133c
parent58088c7aab9209844523daddbbad71e6a900d1ad (diff)
downloadswig-c1399658ff2623f4910a08499240a464ef43d180.tar.gz
[Perl] Don't specify Perl prototype "()" for a constructor with a
different name to the class, as such constructors can still take parameters. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@11397 626c5289-ae23-0410-ae9c-e8d60b6d4f22
-rw-r--r--CHANGES.current5
-rw-r--r--Source/Modules/perl5.cxx2
2 files changed, 6 insertions, 1 deletions
diff --git a/CHANGES.current b/CHANGES.current
index 06c0c8851..89057e97d 100644
--- a/CHANGES.current
+++ b/CHANGES.current
@@ -1,6 +1,11 @@
Version 1.3.40 (in progress)
============================
+2009-07-15: olly
+ [Perl] Don't specify Perl prototype "()" for a constructor with a
+ different name to the class, as such constructors can still take
+ parameters.
+
2009-07-05: olly
[PHP] Update the list of PHP keywords - "cfunction" is no longer a
keyword in PHP5 and PHP 5.3 added "goto", "namespace", "__DIR__",
diff --git a/Source/Modules/perl5.cxx b/Source/Modules/perl5.cxx
index eace179a7..177571dea 100644
--- a/Source/Modules/perl5.cxx
+++ b/Source/Modules/perl5.cxx
@@ -1511,7 +1511,7 @@ public:
Printf(pcode, "sub new {\n");
} else {
/* Constructor doesn't match classname so we'll just use the normal name */
- Printv(pcode, "sub ", Swig_name_construct(symname), " () {\n", NIL);
+ Printv(pcode, "sub ", Swig_name_construct(symname), " {\n", NIL);
}
Printv(pcode,