I added some test files Looks good so far Need someone to spot check
This commit is contained in:
25
tests/sprint3/test/sp3_if_else_nested_exp.alpha
Normal file
25
tests/sprint3/test/sp3_if_else_nested_exp.alpha
Normal file
@ -0,0 +1,25 @@
|
||||
type rec: [character: x; integer: y]
|
||||
|
||||
type T2: rec -> integer
|
||||
|
||||
type main: string -> integer
|
||||
function entry: main
|
||||
function bar: T2
|
||||
|
||||
bar (r,s) := {
|
||||
return 0;
|
||||
}
|
||||
|
||||
entry (arg) := {
|
||||
[ integer: x ; integer: y; integer: z;integer: t]
|
||||
|
||||
if ( (x = y) < ( z = t ) ) then {
|
||||
if ( (x < y) = ( z < t ) ) then {
|
||||
x := x;
|
||||
} else {
|
||||
x := 1; (* bar('c', 7); *)
|
||||
}
|
||||
} else {
|
||||
return 0;
|
||||
}
|
||||
}
|
29
tests/sprint3/test/sp3_while_nested_bools.alpha
Normal file
29
tests/sprint3/test/sp3_while_nested_bools.alpha
Normal file
@ -0,0 +1,29 @@
|
||||
type rec: [character: x; integer: y]
|
||||
|
||||
type T2: rec -> integer
|
||||
|
||||
type main: string -> integer
|
||||
function entry: main
|
||||
function bar: T2
|
||||
|
||||
bar (r,s) := {
|
||||
return 0;
|
||||
}
|
||||
|
||||
entry (arg) := {
|
||||
[ integer: x ; integer: y; integer: z;integer: t]
|
||||
while ( (!(x = y)) < ( z = t ) ) {
|
||||
x := x;
|
||||
while ( (x < y) = ( z < t ) ) {
|
||||
y := y;
|
||||
}
|
||||
(*
|
||||
if ( (x = y) = ( z < t ) ) then {
|
||||
x := 1;
|
||||
} else {
|
||||
x := 1;
|
||||
}
|
||||
*)
|
||||
}
|
||||
return 0;
|
||||
}
|
Reference in New Issue
Block a user