diff options
author | Son Ho | 2022-03-03 12:22:30 +0100 |
---|---|---|
committer | Son Ho | 2022-03-03 12:22:30 +0100 |
commit | eeac69419158552ef455a4197e78567837c546ca (patch) | |
tree | 4ad4c6da9826ffc062a4f8d071054aa8e765ef74 /src/PrintPure.ml | |
parent | 27fb3e6485ee277f222bec8f5ff352346cc1cc5a (diff) |
Add an Opaque variant to type_decl_kind and start updating the code
Diffstat (limited to 'src/PrintPure.ml')
-rw-r--r-- | src/PrintPure.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/PrintPure.ml b/src/PrintPure.ml index e96edeed..65b151a3 100644 --- a/src/PrintPure.ml +++ b/src/PrintPure.ml @@ -189,6 +189,7 @@ let type_decl_to_string (fmt : type_formatter) (def : type_decl) : string = in let variants = String.concat "\n" variants in "enum " ^ name ^ params ^ " =\n" ^ variants + | Opaque -> "opaque type " ^ name ^ params let var_to_string (fmt : type_formatter) (v : var) : string = let varname = |