RosettaCodeData/Task/Array-concatenation/Aime/array-concatenation.aime

24 lines
223 B
Text
Raw Permalink Normal View History

2019-09-12 10:33:56 -07:00
ac(list a, b)
2017-09-23 10:01:46 +02:00
{
list o;
2018-06-22 20:57:24 +00:00
o.copy(a);
b.ucall(l_append, 1, o);
2017-09-23 10:01:46 +02:00
2018-06-22 20:57:24 +00:00
o;
2017-09-23 10:01:46 +02:00
}
main(void)
{
list a, b, c;
2018-06-22 20:57:24 +00:00
a = list(1, 2, 3, 4);
b = list(5, 6, 7, 8);
2017-09-23 10:01:46 +02:00
c = ac(a, b);
2018-06-22 20:57:24 +00:00
c.ucall(o_, 1, " ");
2017-09-23 10:01:46 +02:00
2019-09-12 10:33:56 -07:00
0;
2017-09-23 10:01:46 +02:00
}