Allow "type t = A" instead of forcing "A | ..."

This commit is contained in:
Léonard Gérard 2010-11-04 18:10:20 +01:00
parent f2bc010135
commit a273170a31

View file

@ -141,7 +141,7 @@ type_dec:
;
enum_ty_desc:
| Constructor BAR Constructor {[$1;$3]}
| Constructor {[$1]}
| BOOL BAR BOOL {[(if $1 then "true" else "false");
(if $3 then "true" else "false")]}
| Constructor BAR enum_ty_desc {$1 :: $3}