File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -2,19 +2,35 @@ STR: s1 = "foo"
22STR: s2 = "bar"
33JOIN(@s1, s2)
44ASSERT(EQ(s1, "foobar"))
5+ ASSERT(EQ(s2, "bar"))
6+
7+ STR: s1 = "foo"
8+ STR: s2 = "bar"
9+ JOIN(s1, @s2)
10+ ASSERT(EQ(s1, "foo"))
511ASSERT(EQ(s2, "foobar"))
612
7- // separator-mode: first arg is single-char separator, writeback for args 1..n-1 only
8- STR: sep = ","
9- STR: a1 = "one"
10- STR: b1 = "two"
11- JOIN(sep, @a1, b1)
12- ASSERT(EQ(a1, "one,two"))
13- ASSERT(EQ(b1, "one,two"))
13+ STR: s1 = "foo"
14+ STR: s2 = "bar"
15+ JOIN(@s1, @s2)
16+ ASSERT(EQ(s1, "foobar"))
17+ ASSERT(EQ(s2, "foobar"))
1418
15- // integer join mode (joins integer string representations )
16- INT: i1 = 0d10
17- INT: i2 = 0d5
19+ ! integer join mode (joins integer binary spellings )
20+ INT: i1 = 0b1010
21+ INT: i2 = 0b101
1822JOIN(@i1, i2)
19- ASSERT(EQ(i1, 0d105))
20- ASSERT(EQ(i2, 0d105))
23+ ASSERT(EQ(i1, 0b1010101))
24+ ASSERT(EQ(i2, 0b101))
25+
26+ INT: i1 = 0b1010
27+ INT: i2 = 0b101
28+ JOIN(i1, @i2)
29+ ASSERT(EQ(i1, 0b1010))
30+ ASSERT(EQ(i2, 0b1010101))
31+
32+ INT: i1 = 0b1010
33+ INT: i2 = 0b101
34+ JOIN(@i1, @i2)
35+ ASSERT(EQ(i1, 0b1010101))
36+ ASSERT(EQ(i2, 0b1010101))
You can’t perform that action at this time.
0 commit comments