From be2d7f2655cc6bdb5d99e5408d70347913985102 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Thu, 4 Apr 2019 13:43:05 +0200
Subject: [PATCH] Testsuite: Added test of [LysLysKOM 23258037].
---
.gitattributes | 1 -
src/testsuite.in | 12 +++++++++++-
2 files changed, 11 insertions(+), 2 deletions(-)
diff --git a/.gitattributes b/.gitattributes
index 9ef7ae2188..a1cfa41091 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -896,7 +896,6 @@ testfont binary
/src/svalue.c foreign_ident
/src/svalue.h foreign_ident
/src/test_co.pike foreign_ident
-/src/testsuite.in foreign_ident
/src/threads.c foreign_ident
/src/threads.h foreign_ident
/src/time_stuff.h foreign_ident
diff --git a/src/testsuite.in b/src/testsuite.in
index 1ba99d2e64..3cb3b3d09a 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,5 +1,5 @@
START_MARKER
-test_true([["$Id: testsuite.in,v 1.890 2010/02/09 12:30:24 grubba Exp $"]]);
+test_true([["$Id$"]]);
// This triggered a bug only if run sufficiently early.
test_compile_any([[#pike 7.2]])
@@ -2856,6 +2856,16 @@ test_any([[
return 0;
]], 0)
+test_any_equal([[
+ // Test automap combined with splice. [LysLysKOM 23258037]
+ array ret = ({});
+ for (int x = 0; x < 10; x++) {
+ array a = ({ x, });
+ ret += `+(a[*], @a);
+ }
+ return ret;
+]], ({ 0, 2, 4, 6, 8, 10, 12, 14, 16, 18 }))
+
test_any([[
// Test eval_low() on seemingly constant expressions, that
// attempt to access variables in the fake object. [Bug 5273]
--
GitLab