About current garbage collector implementation

Hi all. I want to learn lua internals. Is there any reference to current implementation of Lua garbage collector? Maybe it was taken from some book? or does it have own implementation? I suppose that lua uses standard 3-color marking algorithm, but I am not sure (and unfortunately I did not find descriptive article about such aglrotihm). Thanks for response