aboutsummaryrefslogtreecommitdiff
path: root/tests/variable/target-specific/testscript
blob: 64ca0b65d7aedfc49ed9a3130877db1a05249e0d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
# file      : tests/variable/scope-specific/testscript
# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
# license   : MIT; see accompanying LICENSE file

.include ../../common.test

: basic-line
:
$* <<EOI >>EOO
x = x
#./: x = X @@ TMP
dir{./}: x = X
file{foo}: [uint64] y=00
sub/
{
  file{foo}: z = Z
}
print $x
print $(./: x)
print $(file{foo}: y)
print $(sub/file{foo}: z)
EOI
x
X
0
Z
EOO

: eval-qual
:
$* <<EOI >>EOO
print (foo:bar)
print (foo :bar)
print (foo: bar)
print (foo : bar)
print (foo/: bar)
print (foo/file{fox}: bar)
EOI
foo:bar
foo:bar
foo:bar
foo:bar
foo/:bar
foo/file{fox}:bar
EOO

: eval-qual-name-expected
:
$* <<EOI 2>>EOE != 0
print (foo:)
EOI
<stdin>:1:12: error: expected name instead of ')'
EOE

: eval-qual-target-expected
:
$* <<EOI 2>>EOE != 0
print (:foo)
EOI
<stdin>:1:8: error: expected target before ':'
EOE