11 lines
143 B
Plaintext
11 lines
143 B
Plaintext
(* TEST: [-asc -tc] *)
|
|
type M : string -> integer
|
|
function entry : M
|
|
|
|
entry(s) := {
|
|
[
|
|
integer: x; integer: x
|
|
]
|
|
return x;
|
|
}
|