Looks like Google is using Lisp (a Scheme dialect, to be precise) as part of their Android App Inventor:

http://appinventor.googlelabs.com/about/