(use s11n)

(define (deserialize-from-string str)
  (call-with-input-string str
   (lambda (port)
     (deserialize port))))

#;5> (deserialize-from-string "actual-garbage")
[panic] out of memory - heap has reached its maximum size - execution terminated

...more...
<syntax>
<syntax>
<eval>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<syntax>
<eval>
<eval>
<eval> 	<--

Process scheme exited abnormally with code 1