1 {
2 #! /bin/bash
3 echo '# test' > test.out
4 ./append1 '1 2 3'
5 ./append1 '4;5;6'
6 cat test.out
7 exit 0
8 }
9 program append1;
10 uses mtx09;
11 var
12 a: mtx;
13 f: text;
14 begin
15 append(f,'test.out');
16 equ(a,paramstr(1));
17 mwr(a,f)
18 end.
19 {
20 # test
21 1 2 3
22
23 4
24 5
25 6
26
27 }