if (ret == NULL){
ret = newType (typename, key, TYPE_LINK, father);
//INFO8("LinkType %s(%s), child of %s(%s) %s(%s)->%s(%s)", ret->name, ret->id, father->name, father->id, source->name, source->id, dest->name, dest->id);
if (ret == NULL){
ret = newType (typename, key, TYPE_LINK, father);
//INFO8("LinkType %s(%s), child of %s(%s) %s(%s)->%s(%s)", ret->name, ret->id, father->name, father->id, source->name, source->id, dest->name, dest->id);