blob: 664f092f937f8e1a8b478660fda990918f137481 (
plain)
1
2
3
4
5
6
7
8
9
|
/* a record type and a record variable */
let
type rectype = {name : string, age : int}
var rec1 : rectype := rectype {name="Nobody", age=1000}
in
rec1 <> nil;
rec1 := nil;
rec1 <> nil
end
|