model_server/dd/src/dd_set_baseclass.cxx
//-----------------------------------------
//Function Name: dd_set_baseclass_rel
//
//Description: establish a baseclass relationship in the DD
//
//    for internal use only
//
Function Name: dd_set_baseclass_rel
Description: establish a baseclass relationship in the DD

for internal use only
Function Name : dd_set_baseclass_rel Description : establish a baseclass relationship in the DD for internal use only
void dd_set_baseclass_rel( ddElementPtr ep, ddElementPtr cp,
		 int is_virtual, ddProtection protect)
{
  Initialize(dd_set_baseclass_rel);
  if ( protect == DD_PUBLIC ) {
    if ( is_virtual ) {
      put_relation(vpub_baseclassof,ep,cp);
    }
    else {
      put_relation(pub_baseclassof,ep,cp);
    }
  }
  else if ( protect == DD_PROTECTED ) {
    if ( is_virtual ) {
      put_relation(vpro_baseclassof,ep,cp);
    }
    else {
      put_relation(pro_baseclassof,ep,cp);
    }
  }
  else if ( protect == DD_PRIVATE ) { 
    if ( is_virtual ) {
      put_relation(vpri_baseclassof,ep,cp);
    }
    else {
      put_relation(pri_baseclassof,ep,cp);
    }
  }
  else LanguageError();
  Return
}
void dd_set_baseclass_rel ( ddElementPtr ep , ddElementPtr cp , int is_virtual , ddProtection protect ) { Initialize ( dd_set_baseclass_rel ) ; if ( protect == DD_PUBLIC ) { if ( is_virtual ) { put_relation ( vpub_baseclassof , ep , cp ) ; } else { put_relation ( pub_baseclassof , ep , cp ) ; } } else if ( protect == DD_PROTECTED ) { if ( is_virtual ) { put_relation ( vpro_baseclassof , ep , cp ) ; } else { put_relation ( pro_baseclassof , ep , cp ) ; } } else if ( protect == DD_PRIVATE ) { if ( is_virtual ) { put_relation ( vpri_baseclassof , ep , cp ) ; } else { put_relation ( pri_baseclassof , ep , cp ) ; } } else LanguageError ( ) ; Return }
Function Name: dd_set_baseclass_rel
Description: establish a baseclass relationship in the DD
Function Name : dd_set_baseclass_rel Description : establish a baseclass relationship in the DD