summaryrefslogtreecommitdiff
path: root/src/PrintPure.ml
diff options
context:
space:
mode:
authorSon Ho2022-03-03 12:22:30 +0100
committerSon Ho2022-03-03 12:22:30 +0100
commiteeac69419158552ef455a4197e78567837c546ca (patch)
tree4ad4c6da9826ffc062a4f8d071054aa8e765ef74 /src/PrintPure.ml
parent27fb3e6485ee277f222bec8f5ff352346cc1cc5a (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.ml1
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 =