diff --git a/idlc/test/parser/constructor.tests b/idlc/test/parser/constructor.tests
index 67cc142ed915..bf80e95b90d3 100644
--- a/idlc/test/parser/constructor.tests
+++ b/idlc/test/parser/constructor.tests
@@ -4,9 +4,9 @@
 #
 #   $RCSfile: constructor.tests,v $
 #
-#   $Revision: 1.5 $
+#   $Revision: 1.6 $
 #
-#   last change: $Author: kz $ $Date: 2006-11-06 14:41:15 $
+#   last change: $Author: ihi $ $Date: 2006-12-19 11:35:32 $
 #
 #   The Contents of this file are made available subject to
 #   the terms of GNU Lesser General Public License Version 2.1.
@@ -175,3 +175,33 @@ module com { module sun { module star { module test {
 service S: com::sun::star::test::X {
     c([in] any... a);
 };
+
+
+EXPECT SUCCESS "constructor.tests 20":
+module com { module sun { module star { module uno {
+    interface XInterface { void m(); };
+}; }; }; };
+service S: com::sun::star::uno::XInterface {
+    c1([in] long a, [in] long b);
+    c2([in] long a);
+};
+
+
+EXPECT SUCCESS "constructor.tests 21":
+module com { module sun { module star { module uno {
+    interface XInterface { void m(); };
+}; }; }; };
+service S: com::sun::star::uno::XInterface {
+    c1([in] long a);
+    c2([in] long a, [in] long b);
+};
+
+
+EXPECT SUCCESS "constructor.tests 22":
+module com { module sun { module star { module uno {
+    interface XInterface { void m(); };
+}; }; }; };
+service S: com::sun::star::uno::XInterface {
+    c1([in] long a, [in] short b);
+    c2([in] long a, [in] long b);
+};