Knuth also has sample code here:

https://www-cs-faculty.stanford.edu/~knuth/programs.html

I couldn't get some of it to work due to pointer hijinks not cooperating with Macos, but it's fine in a Linux vm.