diff --git a/src/core/gensym.ml b/src/core/gensym.ml index a171ea64..743488b2 100644 --- a/src/core/gensym.ml +++ b/src/core/gensym.ml @@ -25,7 +25,7 @@ let ops = in let pp out = function - | Fresh { id; pre; _ } -> Fmt.fprintf out "$%s[%d]" pre id + | Fresh { id; pre; _ } -> Fmt.fprintf out "%s%d" pre id | _ -> assert false in