From 371e358ac4228a94ee1f4d01fa955faa104c72c9 Mon Sep 17 00:00:00 2001
From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org>
Date: Mon, 10 May 1999 00:06:08 +0200
Subject: [PATCH] test for [a]=({1,2}) and [a,b]=({1}) added
Rev: src/testsuite.in:1.169
---
src/testsuite.in | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index bbd0606de1..bfc14154a3 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.168 1999/05/03 18:16:54 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.169 1999/05/09 22:06:08 mirar Exp $"]])
cond([[all_constants()->_verify_internals]],
[[
test_do(_verify_internals())
@@ -52,6 +52,8 @@ test_any([[ int a,b; [a,b]=({1,2}); return a]],1)
test_any([[ int a,b; [a,b]=({1,2}); return b]],2)
test_any([[ int a,b; [ [a],b]=({ ({ 1 }) ,2}); return a]],1)
test_any([[ int a,b; [ [a],b]=({ ({ 1 }) ,2}); return b]],2)
+test_any([[ int a; catch { [a]=({1,2}); }; return 1]],1)
+test_any([[ int a,b; catch { [a,b]=({1}); }; return 1]],1)
test_compile_error([[ default ; ]])
test_compile_error([[ 0999; ]])
test_compile_error([[ int a,b; [a,b]++; ]])
--
GitLab