It's just another lisp, right? Common lisp already fixes it (or never broke it in the first place):

    > cat test.lisp 
    (prin1 "hello, world")
    
    > time clisp test.lisp 
    "hello, world"
    
    real	0m0.019s
    user	0m0.011s
    sys	0m0.008s
    
    > cat test.clj 
    (print "hello, world\n")
    
    > time clojure test.clj
    hello, world
    
    real	0m0.929s
    user	0m1.283s
    sys	0m0.046s