From 69115760bdbd4bfeef4e4ad8cb545be9a6a86da7 Mon Sep 17 00:00:00 2001
From: Rüdiger Timm <rt@openoffice.org>
Date: Thu, 9 Mar 2006 09:49:05 +0000
Subject: INTEGRATION: CWS jl31 (1.4.18); FILE MERGED 2006/02/20 15:58:28 sb
 1.4.18.1: #i62339# Forbid any unsigned types (i.e., not just UNSIGNED
 SHORT/LONG/HYPER, but also sequences of such) as type arguments of
 instantiated polymorphic struct types.

---
 idlc/test/parser/polystruct.tests | 32 ++++++++++++++++++++++++++++++--
 1 file changed, 30 insertions(+), 2 deletions(-)

(limited to 'idlc/test')

diff --git a/idlc/test/parser/polystruct.tests b/idlc/test/parser/polystruct.tests
index 968854729e4a..fd5c44e74e81 100644
--- a/idlc/test/parser/polystruct.tests
+++ b/idlc/test/parser/polystruct.tests
@@ -4,9 +4,9 @@
 #
 #   $RCSfile: polystruct.tests,v $
 #
-#   $Revision: 1.4 $
+#   $Revision: 1.5 $
 #
-#   last change: $Author: rt $ $Date: 2005-09-07 18:18:50 $
+#   last change: $Author: rt $ $Date: 2006-03-09 10:49:05 $
 #
 #   The Contents of this file are made available subject to
 #   the terms of GNU Lesser General Public License Version 2.1.
@@ -236,3 +236,31 @@ module com { module sun { module star { module uno {
 }; }; }; };
 struct Struct<T> { long member; };
 interface X { void f([in] Struct<unsigned hyper> p); };
+
+
+EXPECT FAILURE "polystruct.tests 43":
+struct Struct1<T> { long member; };
+struct Struct2 { Struct1<sequence<unsigned short> > member; };
+
+
+EXPECT SUCCESS "polystruct.tests 44":
+struct Struct1<T> { long member; };
+struct Struct2 { Struct1<sequence<char> > member; };
+
+
+EXPECT FAILURE "polystruct.tests 45":
+struct Struct1<T> { long member; };
+typedef unsigned short td;
+struct Struct2 { Struct1<td> member; };
+
+
+EXPECT FAILURE "polystruct.tests 46":
+struct Struct1<T> { long member; };
+typedef sequence<unsigned short> td;
+struct Struct2 { Struct1<td> member; };
+
+
+EXPECT FAILURE "polystruct.tests 47":
+struct Struct1<T> { long member; };
+typedef unsigned short td;
+struct Struct2 { Struct1<sequence<td> > member; };
-- 
cgit