I didn't write it, but I came across something that might be of interest to you:

http://pbrisbin.com/posts/writing_json_apis_with_yesod/