comparison rathaxes_add_a_test_to_reproduce_the_pointer_to_rathaxes_bug.patch @ 95:4e7107e284de

Check that direct assignment works too in the pointer to Rathaxes type regression test
author Louis Opter <louis@lse.epita.fr>
date Mon, 22 Oct 2012 02:02:22 +0200
parents 5eb746474f0f
children
comparison
equal deleted inserted replaced
94:c908de343118 95:4e7107e284de
1 # HG changeset patch 1 # HG changeset patch
2 # Parent 7eec45c5cc587ee8b1839b38e9d9ec652856c45a 2 # Parent 7adecea6d0fdaad6bb4a97993ef3f7e6cb465b8e
3 rathaxes: add a test for the pointer to Rathaxes type bug 3 rathaxes: add a test for the pointer to Rathaxes type bug
4
5 4
6 diff --git a/rathaxes/compiler/tests/CMakeLists.txt b/rathaxes/compiler/tests/CMakeLists.txt 5 diff --git a/rathaxes/compiler/tests/CMakeLists.txt b/rathaxes/compiler/tests/CMakeLists.txt
7 --- a/rathaxes/compiler/tests/CMakeLists.txt 6 --- a/rathaxes/compiler/tests/CMakeLists.txt
8 +++ b/rathaxes/compiler/tests/CMakeLists.txt 7 +++ b/rathaxes/compiler/tests/CMakeLists.txt
9 @@ -43,3 +43,5 @@ 8 @@ -43,3 +43,5 @@
22 + BLT pointer_to_rathaxes_type.blt) 21 + BLT pointer_to_rathaxes_type.blt)
23 diff --git a/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt b/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt 22 diff --git a/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt b/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt
24 new file mode 100644 23 new file mode 100644
25 --- /dev/null 24 --- /dev/null
26 +++ b/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt 25 +++ b/rathaxes/compiler/tests/pointer_to_rathaxes_type/pointer_to_rathaxes_type.blt
27 @@ -0,0 +1,32 @@ 26 @@ -0,0 +1,33 @@
28 +with Test 27 +with Test
29 +{ 28 +{
30 + ${pointcut Test::code()}; 29 + ${pointcut Test::code()};
31 + 30 +
32 + template type Test::Test() 31 + template type Test::Test()
47 + { 46 + {
48 + int 47 + int
49 + main(void) 48 + main(void)
50 + { 49 + {
51 + ${Test::Test} *p; 50 + ${Test::Test} *p;
51 + ${Test::Test} *assign = NULL;
52 + 52 +
53 + ${pointcut ::IMPLEMENTATION(local.p)}; 53 + ${pointcut ::IMPLEMENTATION(local.p)};
54 + 54 +
55 + return 0; 55 + return 0;
56 + } 56 + }