Name: creator - return the creator of an object

Syntax:
	string creator(object ob)

Description:
	The creator efun returns the creator of an object. 

Return value:
	If the creator is a domain or a wizard, the name of the domain or
	the wizard is returned, else 0.

Examples:
	string creator;
	creator=creator(this_object());