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
62
|
#! /bin/sh
# Copyright (C) 2020-2021 Free Software Foundation, Inc.
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.
cat >input <<EOF
z + q;
EOF
run 0 "1.0-5: +(z, q)"
cat >input <<EOF
T x;
EOF
run 0 "1.0-3: <declare>(T, x)"
cat >input <<EOF
T x = y;
EOF
run 0 "1.0-7: <init-declare>(T, x, y)"
cat >input <<EOF
x = y;
EOF
run 0 "1.0-5: =(x, y)"
cat >input <<EOF
T (x) + y;
EOF
run 0 "1.0-9: +(<cast>(x, T), y)"
cat >input <<EOF
T (x);
EOF
run 0 "1.0-5: <OR>(<declare>(T, x), <cast>(x, T))"
cat >input <<EOF
T (y) = z + q;
EOF
run 0 "1.0-13: <OR>(<init-declare>(T, y, +(z, q)), =(<cast>(y, T), +(z, q)))"
cat >input <<EOF
T (y y) = z + q;
EOF
run 0 "1.0-15: <error>
err: 1.5: syntax error, unexpected identifier, expecting '=' or '+' or ')'"
cat >input <<EOF
z + q;
EOF
run 0 "1.0-5: +(z, q)"
|
