Add __LOC__, a template haskell function to embed a Loc value

I'm not sure where I came across __LOC__, but this seems like a good home for it.