10 lines
198 B
OCaml
10 lines
198 B
OCaml
|
|
type prog = Prog of stmt list
|
|
|
|
and stmt =
|
|
| Assign of string * string
|
|
| While of string * stmt
|
|
| Seq of stmt list
|
|
| IfThen of string * stmt
|
|
| IfThenElse of string * stmt * stmt
|