--- parser3/tests/432.html 2024/10/02 16:28:50 1.1
+++ parser3/tests/432.html 2024/10/22 21:58:56 1.3
@@ -11,7 +11,7 @@ $a.1[a]
$a.1[a]
^first_and_last[One element was added (^$a.1[a]);$a]
-$a[^array::create[
+$a[^array::copy[
$.1[a]
$.2[b]
$.3[c]
@@ -32,14 +32,19 @@ $a.5[e]
$a.3[cc]
^first_and_last[One element was added at the middle (^$a.3[cc]);$a]
-
_at on hash with 5 elements (^$a[ ^$.1[a] ^$.2[b] ^$.3[c] ^$.4[d] ^$.5[e] ])
-$a[^array::create[
+$a[^array::copy[
$.1[a]
$.2[b]
$.3[c]
$.4[d]
$.5[e]
]]
+^test_at[]
+$a[a;b;c;d;e]
+^test_at[]
+
+@test_at[]
+_at on array with ^a.count[] elements (^$a[ ^a.foreach[k;v]{^$.${k}[$v]}[ ] ])
^at(0)
^at(1)
^at(2)
@@ -74,6 +79,9 @@ $a[^array::create[
^at(3)[hash]
^at(4)[hash]
+^^a._at[first;hash]=^print[^a._at[first;hash]]
+^^a._at[last;hash]=^print[^a._at[last;hash]]
+
# check if values preserve tainting. keys are always lost tainting
The first element was replaced (^$a.1[b&b])