Try to split this 400 lines (!) function.
	+ Factorize some duplicated code.

Ident.t is now an abstract data type (instead of a string).
fullid is turned into an Ident.long, and is also made abstract.