aboutsummaryrefslogtreecommitdiff
path: root/tests/iii/template-pack-errors/program.cps
blob: 51ffa4695fe8adab6acde26e7ead40fce15e9e37 (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

TEMPLATE <Rest...>
PROCEDURE NotLast(Values : Rest..., Extra : INTEGER)
ENDPROCEDURE

TEMPLATE <Rest...>
PROCEDURE ArrayPack(Values : ARRAY OF Rest...)
ENDPROCEDURE

TEMPLATE <T>
PROCEDURE WrongPack(Values : T...)
ENDPROCEDURE

TEMPLATE <Rest...>
PROCEDURE BarePack(Values : Rest...)
    OUTPUT Values
ENDPROCEDURE

TEMPLATE <T>
PROCEDURE ScalarExpansion(Value : T)
    CALL Missing(Value...)
ENDPROCEDURE

TEMPLATE <T>
PROCEDURE WrongTypeExpansion(Value : T)
    CALL Missing<T...>(Value)
ENDPROCEDURE

TEMPLATE <Rest...>
PROCEDURE MissingDots(Values : Rest)
ENDPROCEDURE

OUTPUT 0