You can give this a shot, though it’s a bit of a pain to set up.
In the next Core release (coming very soon!), the Sexp_pretty pretty printer is available as print_s, so you can just write:
print_s [%sexp (foo : int list)]
to print a nicely formatted sexp.
y