Racket and #lang are a pretty good start.

http://www.ccs.neu.edu/home/matthias/manifesto/sec_pl-pl.htm...