All of the machine descriptions are written in Lisp. See gcc/config/i386.md for an example.