From eea216e162759d572dd5962cb0f24ec4f0796fb9 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Fri, 11 Jul 2008 15:54:23 +0200
Subject: [PATCH] Added test for bogus warning.
Rev: src/testsuite.in:1.839
---
src/testsuite.in | 16 +++++++++++++++-
1 file changed, 15 insertions(+), 1 deletion(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index c2fda1da90..9bdf6880f9 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,5 +1,5 @@
START_MARKER
-test_true([["$Id: testsuite.in,v 1.838 2008/07/04 15:53:53 mast Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.839 2008/07/11 13:54:23 mast Exp $"]]);
// This triggered a bug only if run sufficiently early.
test_compile_any([[#pike 7.2]])
@@ -593,6 +593,20 @@ test_compile_error([[ float b=17.0; string a; a=b*42.0; ]])
test_compile_error([[class F {inherit master()->dirnode;};]]);
+test_any([[
+ class A {
+ constant i = -1;
+ string f() {
+ return ([1: "foo"])[i] || "bar"; // No warning here. C.f. lyslys 16630665.
+ }
+ };
+ class B {
+ inherit A;
+ constant i = 1;
+ };
+ return B()->f();
+]], "foo")
+
ignore_warning("Wrong return type.", [[
ignore_warning("Expected: string.", [[
ignore_warning("Got : array(string).", [[
--
GitLab