BadVPN – Blame information for rev 1
?pathlinks?
Rev | Author | Line No. | Line |
---|---|---|---|
1 | office | 1 | process main { |
2 | var("0123456789") str; |
||
3 | concat(str) external_str; |
||
4 | |||
5 | call("do_test", {"_caller.str"}); |
||
6 | call("do_test", {"_caller.external_str"}); |
||
7 | |||
8 | exit("0"); |
||
9 | } |
||
10 | |||
11 | template do_test { |
||
12 | alias(_arg0) str; |
||
13 | |||
14 | substr(str, "0") sub; |
||
15 | val_equal(sub, "0123456789") a; |
||
16 | assert(a); |
||
17 | |||
18 | substr(str, "2") sub; |
||
19 | val_equal(sub, "23456789") a; |
||
20 | assert(a); |
||
21 | |||
22 | substr(str, "3", "0") sub; |
||
23 | val_equal(sub, "") a; |
||
24 | assert(a); |
||
25 | |||
26 | substr(str, "3", "6") sub; |
||
27 | val_equal(sub, "345678") a; |
||
28 | assert(a); |
||
29 | |||
30 | substr(str, "3", "7") sub; |
||
31 | val_equal(sub, "3456789") a; |
||
32 | assert(a); |
||
33 | |||
34 | substr(str, "3", "8") sub; |
||
35 | val_equal(sub, "3456789") a; |
||
36 | assert(a); |
||
37 | } |