Small stealth mode startup in Vancouver, Canada that does custom DSLs for the oil & gas industry. I found the job on my local CL, they were advertising looking for anybody who had read SICP, or had experience doing functional programming. It doesn't pay a lot but enough to live comfortably while single plus I get to hack around in Scheme all day, though now they want me to learn Haskell too.
I work 6hrs a day usually and spend the rest of time experimenting with my own DSLs for future side projects or enjoying life whereas before I'd go to work before the sun came up, work in a windowless office under constant unachievable deadlines then leave at night. I had money but no life.