A package to read definitions of in-memory Mathematica functions with ease. Developed by Simon Woods and others in this Mathematica.SE thread.

Usage:

1. Load the package using <<Spelunking`
2. Call the Spelunk function with the symbol you are interested in, for example Spelunk[RunThrough]