Define `pretty-print` within `pp-sexp.scm`