| 23 |
} |
} |
| 24 |
and texpr' = |
and texpr' = |
| 25 |
| Forget of texpr * ttyp |
| Forget of texpr * ttyp |
| 26 |
|
| Check of texpr * ttyp |
| 27 |
(* CDuce is a Lambda-calculus ... *) |
(* CDuce is a Lambda-calculus ... *) |
| 28 |
| Var of id |
| Var of id |
| 29 |
| ExtVar of Types.CompUnit.t * id * Types.t |
| ExtVar of Types.CompUnit.t * id * Types.t |
| 47 |
| RemoveField of texpr * label |
| RemoveField of texpr * label |
| 48 |
| Dot of texpr * label |
| Dot of texpr * label |
| 49 |
|
|
| 50 |
|
|
| 51 |
(* Exception *) |
(* Exception *) |
| 52 |
| Try of texpr * branches |
| Try of texpr * branches |
| 53 |
|
|