[racket] evaluate string which contains many definitions

I mean run this expression

 (eval (read (open-input-string content)) ns)

You will see the output is only the first s-expression.

N.