diff options
Diffstat (limited to 'tests/iii/template-pack-errors/program.cps')
| -rw-r--r-- | tests/iii/template-pack-errors/program.cps | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/tests/iii/template-pack-errors/program.cps b/tests/iii/template-pack-errors/program.cps new file mode 100644 index 0000000..51ffa46 --- /dev/null +++ b/tests/iii/template-pack-errors/program.cps @@ -0,0 +1,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 |