#;1> (write "1") "1"#;2> (with-output-to-string (write "1")) Error: call of non-procedure: # Call history: (with-output-to-string (write "1")) (write "1") (with-output-to-string (write "1")) (write "1") <-- "1"#;2>