modern-compiler-ml/tiger/testcases/test3.tig
jmug 33d8bac511 Add the tiger source code bundle from the book site
Signed-off-by: jmug <u.g.a.mariano@gmail.com>
2024-12-18 15:18:45 -08:00

8 lines
180 B
Text

/* a record type and a record variable */
let
type rectype = {name:string, age:int}
var rec1:rectype := rectype {name="Nobody", age=1000}
in
rec1.name := "Somebody";
rec1
end