From 0a26b569f2d57cfb05dfa9c4e0b6f7837c23a99b Mon Sep 17 00:00:00 2001 From: =?utf8?q?Alexis=20Laferri=C3=A8re?= Date: Wed, 10 Sep 2014 15:39:11 -0400 Subject: [PATCH] tests: intro test for polymorphic use of extern classes MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Alexis Laferrière --- tests/sav/test_ffi_c_polymorphism.res | 3 ++ tests/sav/test_ffi_c_polymorphism_alt1.res | 1 + tests/sav/test_ffi_c_polymorphism_alt2.res | 1 + tests/test_ffi_c_polymorphism.nit | 58 ++++++++++++++++++++++++++++ 4 files changed, 63 insertions(+) create mode 100644 tests/sav/test_ffi_c_polymorphism.res create mode 100644 tests/sav/test_ffi_c_polymorphism_alt1.res create mode 100644 tests/sav/test_ffi_c_polymorphism_alt2.res create mode 100644 tests/test_ffi_c_polymorphism.nit diff --git a/tests/sav/test_ffi_c_polymorphism.res b/tests/sav/test_ffi_c_polymorphism.res new file mode 100644 index 0000000..de98044 --- /dev/null +++ b/tests/sav/test_ffi_c_polymorphism.res @@ -0,0 +1,3 @@ +a +b +c diff --git a/tests/sav/test_ffi_c_polymorphism_alt1.res b/tests/sav/test_ffi_c_polymorphism_alt1.res new file mode 100644 index 0000000..a2c2d95 --- /dev/null +++ b/tests/sav/test_ffi_c_polymorphism_alt1.res @@ -0,0 +1 @@ +alt/test_ffi_c_polymorphism_alt1.nit:56,15--25: Type error: expected NativeB, got NativeA diff --git a/tests/sav/test_ffi_c_polymorphism_alt2.res b/tests/sav/test_ffi_c_polymorphism_alt2.res new file mode 100644 index 0000000..58254a5 --- /dev/null +++ b/tests/sav/test_ffi_c_polymorphism_alt2.res @@ -0,0 +1 @@ +alt/test_ffi_c_polymorphism_alt2.nit:58,12--22: Type error: expected NativeB, got NativeA diff --git a/tests/test_ffi_c_polymorphism.nit b/tests/test_ffi_c_polymorphism.nit new file mode 100644 index 0000000..e66fdbc --- /dev/null +++ b/tests/test_ffi_c_polymorphism.nit @@ -0,0 +1,58 @@ +# This file is part of NIT ( http://www.nitlanguage.org ). +# +# Copyright 2014 Alexis Laferrière +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. + +extern class NativeA + new `{ return NULL; `} + fun foo do print "a" +end + +extern class NativeB + super NativeA + new `{ return NULL; `} + redef fun foo do print "b" +end + +extern class NativeC + super NativeA + new `{ return NULL; `} + redef fun foo do print "c" +end + +class A + type NATIVE: NativeA + var native: NATIVE +end + +class B + super A + redef type NATIVE: NativeB +end + +class C + super A + redef type NATIVE: NativeC +end + +for a in [new A(new NativeA), new B(new NativeB), new C(new NativeC)] do + a.native.foo +end + +var a = new A(new NativeA) +var b = new A(new NativeB) +var c = new B(new NativeB) +#alt1# var d = new B(new NativeA) +a.native = new NativeB +#alt2# c.native = new NativeA -- 1.7.9.5