diff options
| author | Son Ho | 2022-02-08 19:18:57 +0100 |
|---|---|---|
| committer | Son Ho | 2022-02-08 19:18:57 +0100 |
| commit | d54b36be3d365b1a9a4ec8b12313b84c508ecd98 (patch) | |
| tree | 630ce2bc2444af84821364275291c8f0218a3e58 /src/Print.ml | |
| parent | 2145c29ba8d7727f104da83c6be57bf2f3f408d5 (diff) | |
Implement pre-passes to update the AST before executing the interpreter
Diffstat (limited to 'src/Print.ml')
| -rw-r--r-- | src/Print.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Print.ml b/src/Print.ml index 2db92d41..7c1ef79a 100644 --- a/src/Print.ml +++ b/src/Print.ml @@ -733,7 +733,7 @@ module CfimAst = struct | E.Field (E.ProjOption variant_id, fid) -> assert (variant_id == T.option_some_id); assert (fid == T.FieldId.zero); - "(" ^ s ^ "as Option::Some)." ^ T.FieldId.to_string fid + "(" ^ s ^ " as Option::Some)." ^ T.FieldId.to_string fid | E.Field (E.ProjTuple _, fid) -> "(" ^ s ^ ")." ^ T.FieldId.to_string fid | E.Field (E.ProjAdt (adt_id, opt_variant_id), fid) -> ( |