diff --git a/tests/sprint4/test/sp4_cg_calls.alpha~ b/tests/sprint4/test/sp4_cg_calls.alpha~ deleted file mode 100644 index 5a69469..0000000 --- a/tests/sprint4/test/sp4_cg_calls.alpha~ +++ /dev/null @@ -1,34 +0,0 @@ -(* TEST: [-asc -tc -cg -ir] *) - -#include "std.alpha" -(* Standard Alpha Library - Provided by Carl *) - -type string: 1 -> character -function entry: string2integer - - -type rec: [integer: x; integer: y; integer: z; integer: a; integer: b; integer: c; integer: d] - -type T2: rec -> integer -type T: integer -> integer -type main: string -> integer -function entry: main -function bar: T2 -function ahh: T - -ahh (a) := { - a := printInteger(a); - return -1; -} - -bar (a, b, c,d,e,f,g) := { - a := printInteger(f); - return b; -} - -entry (arg) := { - [integer:x; integer:y; integer: result] - - result := bar(1,2,3,4,5,6,7); - return 1; -}