/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_O_REF_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_O_REF * self = (ooaofooa_O_REF *) instance;
/* Initialize application analysis class attributes. */
self->Obj_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->RObj_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
self->ROid_ID = Escher_atoi( avlstring[ 3 ] );
self->RAttr_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
self->Rel_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->OIR_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
self->ROIR_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
self->Attr_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 8 ] );
self->ARef_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 9 ] );
self->PARef_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 10 ] );
self->Is_Cstrd = ( '0' != *avlstring[ 11 ] );
{i_t i = avlstring[ 12 + 1 ] - avlstring[ 12 ];
self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 12 ][ i ]; }
}
self->RObj_Name = Escher_strcpy( self->RObj_Name, avlstring[ 13 ] );
self->RAttr_Name = Escher_strcpy( self->RAttr_Name, avlstring[ 14 ] );
self->Rel_Name = Escher_strcpy( self->Rel_Name, avlstring[ 15 ] );
return return_identifier;
}
/*
* Domain Function: test
*/
void
c1_test()
{
c1_PING * ping; c1_PONG * pong; c_t s[ESCHER_SYS_MAX_STRING_LEN];
/* CREATE OBJECT INSTANCE ping OF PING */
XTUML_OAL_STMT_TRACE( 1, "CREATE OBJECT INSTANCE ping OF PING" );
ping = (c1_PING *) Escher_CreateInstance( c1_DOMAIN_ID, c1_PING_CLASS_NUMBER );
/* CREATE OBJECT INSTANCE pong OF PONG */
XTUML_OAL_STMT_TRACE( 1, "CREATE OBJECT INSTANCE pong OF PONG" );
pong = (c1_PONG *) Escher_CreateInstance( c1_DOMAIN_ID, c1_PONG_CLASS_NUMBER );
/* RELATE ping TO pong ACROSS R1 */
XTUML_OAL_STMT_TRACE( 1, "RELATE ping TO pong ACROSS R1" );
c1_PING_R1_Link( pong, ping );
/* ASSIGN ping.i = 0 */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN ping.i = 0" );
ping->i = 0;
/* ASSIGN pong.s = 'pong' */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN pong.s = 'pong'" );
Escher_strcpy( pong->s, "pong" );
/* ASSIGN s = 'tic function test' */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN s = 'tic function test'" );
Escher_strcpy( s, "tic function test" );
/* SEND toss::s1(sp1:1) */
XTUML_OAL_STMT_TRACE( 1, " SEND toss::s1(sp1:1)" );
c1_toss_s1( 1 );
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_ACT_BLK_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_ACT_BLK * self = (ooaofooa_ACT_BLK *) instance;
/* Initialize application analysis class attributes. */
self->Block_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
return_identifier = self->Block_ID;
self->WhereSpecOK = ( '0' != *avlstring[ 2 ] );
self->InWhereSpec = ( '0' != *avlstring[ 3 ] );
self->SelectedFound = ( '0' != *avlstring[ 4 ] );
self->TempBuffer = Escher_strcpy( self->TempBuffer, avlstring[ 5 ] );
self->SupData1 = Escher_strcpy( self->SupData1, avlstring[ 6 ] );
self->SupData2 = Escher_strcpy( self->SupData2, avlstring[ 7 ] );
self->CurrentLine = Escher_atoi( avlstring[ 8 ] );
self->CurrentCol = Escher_atoi( avlstring[ 9 ] );
self->currentKeyLettersLineNumber = Escher_atoi( avlstring[ 10 ] );
self->currentKeyLettersColumn = Escher_atoi( avlstring[ 11 ] );
self->currentParameterAssignmentNameLineNumber = Escher_atoi( avlstring[ 12 ] );
self->currentParameterAssignmentNameColumn = Escher_atoi( avlstring[ 13 ] );
self->currentAssociationNumberLineNumber = Escher_atoi( avlstring[ 14 ] );
self->currentAssociationNumberColumn = Escher_atoi( avlstring[ 15 ] );
self->currentAssociationPhraseLineNumber = Escher_atoi( avlstring[ 16 ] );
self->currentAssociationPhraseColumn = Escher_atoi( avlstring[ 17 ] );
self->currentDataTypeNameLineNumber = Escher_atoi( avlstring[ 18 ] );
self->currentDataTypeNameColumn = Escher_atoi( avlstring[ 19 ] );
self->blockInStackFrameCreated = ( '0' != *avlstring[ 20 ] );
self->Action_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 21 ] );
self->Parsed_Action_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 22 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_PARM_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_PARM * self = (ooaofooa_TE_PARM *) instance;
/* Initialize application analysis class attributes. */
self->Name = Escher_strcpy( self->Name, avlstring[ 1 ] );
{i_t i = avlstring[ 2 + 1 ] - avlstring[ 2 ];
self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 2 ][ i ]; }
}
self->Order = Escher_atoi( avlstring[ 3 ] );
self->ParamBuffer = Escher_strcpy( self->ParamBuffer, avlstring[ 4 ] );
self->OALParamBuffer = Escher_strcpy( self->OALParamBuffer, avlstring[ 5 ] );
self->ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
return_identifier = self->ID;
self->nextID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
self->GeneratedName = Escher_strcpy( self->GeneratedName, avlstring[ 8 ] );
self->By_Ref = Escher_atoi( avlstring[ 9 ] );
self->te_dtID = (Escher_iHandle_t) Escher_atoi( avlstring[ 10 ] );
self->dimensions = Escher_atoi( avlstring[ 11 ] );
self->te_dimID = (Escher_iHandle_t) Escher_atoi( avlstring[ 12 ] );
self->array_spec = Escher_strcpy( self->array_spec, avlstring[ 13 ] );
self->AbaID = (Escher_iHandle_t) Escher_atoi( avlstring[ 14 ] );
self->SM_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 15 ] );
self->SMedi_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 16 ] );
self->SParm_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 17 ] );
self->TParm_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 18 ] );
self->PP_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 19 ] );
self->BParm_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 20 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_FUNCTION_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_FUNCTION * self = (ooaofooa_TE_FUNCTION *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->method, avlstring[ 1 ] );
Escher_strcpy( self->parameters, avlstring[ 2 ] );
self->Statement_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TM_IF_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TM_IF * self = (ooaofooa_TM_IF *) instance;
/* Initialize application analysis class attributes. */
self->Package = Escher_strcpy( self->Package, avlstring[ 1 ] );
self->Name = Escher_strcpy( self->Name, avlstring[ 2 ] );
self->c_iId = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TM_PRECISION_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TM_PRECISION * self = (ooaofooa_TM_PRECISION *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->Domain, avlstring[ 1 ] );
Escher_strcpy( self->DT_name, avlstring[ 2 ] );
Escher_strcpy( self->xName, avlstring[ 3 ] );
Escher_strcpy( self->initial_value, avlstring[ 4 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TM_SYNC_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TM_SYNC * self = (ooaofooa_TM_SYNC *) instance;
/* Initialize application analysis class attributes. */
self->RegisteredDomain = Escher_strcpy( self->RegisteredDomain, avlstring[ 1 ] );
self->Name = Escher_strcpy( self->Name, avlstring[ 2 ] );
self->IsSafeForInterrupts = ( '0' != *avlstring[ 3 ] );
self->IsInitFunction = ( '0' != *avlstring[ 4 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_TARGET_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_TARGET * self = (ooaofooa_TE_TARGET *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->language, avlstring[ 1 ] );
Escher_strcpy( self->c2cplusplus_linkage_begin, avlstring[ 2 ] );
Escher_strcpy( self->c2cplusplus_linkage_end, avlstring[ 3 ] );
Escher_strcpy( self->main, avlstring[ 4 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_DMA_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_DMA * self = (ooaofooa_TE_DMA *) instance;
/* Initialize application analysis class attributes. */
self->file = Escher_strcpy( self->file, avlstring[ 1 ] );
self->allocate = Escher_strcpy( self->allocate, avlstring[ 2 ] );
self->release = Escher_strcpy( self->release, avlstring[ 3 ] );
self->debugging_heap = ( '0' != *avlstring[ 4 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_ENUM_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_ENUM * self = (ooaofooa_TE_ENUM *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->Name, avlstring[ 1 ] );
Escher_strcpy( self->Value, avlstring[ 2 ] );
self->Order = Escher_atoi( avlstring[ 3 ] );
Escher_strcpy( self->GeneratedName, avlstring[ 4 ] );
self->Enum_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_EVENT_PARAMETERS_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_EVENT_PARAMETERS * self = (ooaofooa_TE_EVENT_PARAMETERS *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->evt_msg_var, avlstring[ 1 ] );
Escher_strcpy( self->parameter, avlstring[ 2 ] );
Escher_strcpy( self->value, avlstring[ 3 ] );
Escher_strcpy( self->value_type, avlstring[ 4 ] );
self->Statement_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_I_AVL_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_I_AVL * self = (ooaofooa_I_AVL *) instance;
/* Initialize application analysis class attributes. */
self->Inst_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->Obj_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
self->Attr_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
Escher_strcpy( self->Value, avlstring[ 4 ] );
Escher_strcpy( self->Label, avlstring[ 5 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_O_IOBJ_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_O_IOBJ * self = (ooaofooa_O_IOBJ *) instance;
/* Initialize application analysis class attributes. */
self->IObj_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->Obj_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
self->Modl_Typ = Escher_atoi( avlstring[ 3 ] );
self->SS_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
self->Obj_Name = Escher_strcpy( self->Obj_Name, avlstring[ 5 ] );
self->Obj_KL = Escher_strcpy( self->Obj_KL, avlstring[ 6 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_SELECT_RELATED_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_SELECT_RELATED * self = (ooaofooa_TE_SELECT_RELATED *) instance;
/* Initialize application analysis class attributes. */
self->Statement_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->link_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
self->starting_Value_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
self->where_clause_Value_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
self->starting_Var_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->result_Var_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
self->by_where = ( '0' != *avlstring[ 7 ] );
self->where_clause = Escher_strcpy( self->where_clause, avlstring[ 8 ] );
self->where_clause_OAL = Escher_strcpy( self->where_clause_OAL, avlstring[ 9 ] );
self->multiplicity = Escher_strcpy( self->multiplicity, avlstring[ 10 ] );
self->is_implicit = ( '0' != *avlstring[ 11 ] );
self->result_var = Escher_strcpy( self->result_var, avlstring[ 12 ] );
self->result_var_OAL = Escher_strcpy( self->result_var_OAL, avlstring[ 13 ] );
self->start_many = ( '0' != *avlstring[ 14 ] );
self->start_var = Escher_strcpy( self->start_var, avlstring[ 15 ] );
self->start_var_OAL = Escher_strcpy( self->start_var_OAL, avlstring[ 16 ] );
self->te_classGeneratedName = Escher_strcpy( self->te_classGeneratedName, avlstring[ 17 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_PAR_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_PAR * self = (ooaofooa_TE_PAR *) instance;
/* Initialize application analysis class attributes. */
self->Name = Escher_strcpy( self->Name, avlstring[ 1 ] );
self->By_Ref = Escher_atoi( avlstring[ 2 ] );
self->buffer = Escher_strcpy( self->buffer, avlstring[ 3 ] );
self->Order = Escher_atoi( avlstring[ 4 ] );
self->Value_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->te_parmID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_VAL_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_VAL * self = (ooaofooa_TE_VAL *) instance;
/* Initialize application analysis class attributes. */
self->OAL = Escher_strcpy( self->OAL, avlstring[ 1 ] );
self->buffer = Escher_strcpy( self->buffer, avlstring[ 2 ] );
self->dimensions = Escher_atoi( avlstring[ 3 ] );
self->array_spec = Escher_strcpy( self->array_spec, avlstring[ 4 ] );
self->te_dimID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->Value_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
return return_identifier;
}
/*
* Domain Function: report
*/
void
perf_funcs_report( i_t p_count, i_t p_duration, c_t p_message[ESCHER_SYS_MAX_STRING_LEN])
{
c_t message[ESCHER_SYS_MAX_STRING_LEN]; i_t count; i_t duration; c_t s[ESCHER_SYS_MAX_STRING_LEN];
/* ASSIGN message = PARAM.message */
Escher_strcpy( message, p_message );
/* ASSIGN count = PARAM.count */
count = p_count;
/* ASSIGN duration = PARAM.duration */
duration = p_duration;
/* ASSIGN s = 'printf( %34s: %10d %4d %10d\n, p_message, p_count, p_duration, ( p_count / p_duration ) * 1000 );' */
Escher_strcpy( s, "printf( %34s: %10d %4d %10d\n, p_message, p_count, p_duration, ( p_count / p_duration ) * 1000 );" );
}
/*
* class operation: populate
*/
ooaofooa_DOC_SEC *
ooaofooa_DOC_SEC_op_populate( ooaofooa_DOC_SEC * p_parent_doc_sec, c_t * p_subtitle, c_t * p_title )
{
ooaofooa_DOC_SEC * parent_doc_sec;ooaofooa_DOC_SEC * doc_sec;
/* CREATE OBJECT INSTANCE doc_sec OF DOC_SEC */
doc_sec = (ooaofooa_DOC_SEC *) Escher_CreateInstance( ooaofooa_DOMAIN_ID, ooaofooa_DOC_SEC_CLASS_NUMBER );
doc_sec->ID = (Escher_UniqueID_t) doc_sec;
/* ASSIGN doc_sec.title = PARAM.title */
doc_sec->title = Escher_strcpy( doc_sec->title, p_title );
/* ASSIGN doc_sec.subtitle = PARAM.subtitle */
doc_sec->subtitle = Escher_strcpy( doc_sec->subtitle, p_subtitle );
/* ASSIGN doc_sec.level = 1 */
doc_sec->level = 1;
/* ASSIGN parent_doc_sec = PARAM.parent_doc_sec */
parent_doc_sec = p_parent_doc_sec;
/* IF ( not_empty parent_doc_sec ) */
if ( ( 0 != parent_doc_sec ) ) {
ooaofooa_DOC_SEC * sibling_doc_sec=0;
/* SELECT one sibling_doc_sec RELATED BY parent_doc_sec->DOC_SEC[R2307.has first child] */
sibling_doc_sec = ( 0 != parent_doc_sec ) ? parent_doc_sec->DOC_SEC_R2307_has_first_child : 0;
/* IF ( empty sibling_doc_sec ) */
if ( ( 0 == sibling_doc_sec ) ) {
/* RELATE doc_sec TO parent_doc_sec ACROSS R2307 */
ooaofooa_DOC_SEC_R2307_Link_has_parent( doc_sec, parent_doc_sec );
/* ASSIGN doc_sec.level = ( parent_doc_sec.level + 1 ) */
doc_sec->level = ( parent_doc_sec->level + 1 );
}
else {
ooaofooa_DOC_SEC * next_doc_sec;
/* ASSIGN next_doc_sec = sibling_doc_sec */
next_doc_sec = sibling_doc_sec;
/* WHILE ( not_empty next_doc_sec ) */
while ( ( 0 != next_doc_sec ) ) {
/* ASSIGN sibling_doc_sec = next_doc_sec */
sibling_doc_sec = next_doc_sec;
/* SELECT one next_doc_sec RELATED BY sibling_doc_sec->DOC_SEC[R2306.follows] */
next_doc_sec = ( 0 != sibling_doc_sec ) ? sibling_doc_sec->DOC_SEC_R2306_follows : 0;
}
/* RELATE sibling_doc_sec TO doc_sec ACROSS R2306 */
ooaofooa_DOC_SEC_R2306_Link_follows( sibling_doc_sec, doc_sec );
/* ASSIGN doc_sec.level = sibling_doc_sec.level */
doc_sec->level = sibling_doc_sec->level;
}
}
/* RETURN doc_sec */
{ooaofooa_DOC_SEC * xtumlOALrv = doc_sec;
return xtumlOALrv;}
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TM_TPV_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TM_TPV * self = (ooaofooa_TM_TPV *) instance;
/* Initialize application analysis class attributes. */
self->ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
return_identifier = self->ID;
Escher_strcpy( self->instance, avlstring[ 2 ] );
Escher_strcpy( self->value, avlstring[ 3 ] );
self->tm_tpID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
self->te_iirID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->te_ciID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_DOC_SEC_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_DOC_SEC * self = (ooaofooa_DOC_SEC *) instance;
/* Initialize application analysis class attributes. */
self->ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
return_identifier = self->ID;
self->nextID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
self->title = Escher_strcpy( self->title, avlstring[ 3 ] );
self->subtitle = Escher_strcpy( self->subtitle, avlstring[ 4 ] );
self->level = Escher_atoi( avlstring[ 5 ] );
self->abstract = Escher_strcpy( self->abstract, avlstring[ 6 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_GENERATE_CREATOR_EVENT_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_GENERATE_CREATOR_EVENT * self = (ooaofooa_TE_GENERATE_CREATOR_EVENT *) instance;
/* Initialize application analysis class attributes. */
self->sm_evt = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->self_directed = ( '0' != *avlstring[ 2 ] );
Escher_strcpy( self->var_name, avlstring[ 3 ] );
Escher_strcpy( self->event_label, avlstring[ 4 ] );
Escher_strcpy( self->event_meaning, avlstring[ 5 ] );
Escher_strcpy( self->parameters, avlstring[ 6 ] );
self->Statement_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_BRG_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_BRG * self = (ooaofooa_TE_BRG *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->EEname, avlstring[ 1 ] );
Escher_strcpy( self->EEkeyletters, avlstring[ 2 ] );
Escher_strcpy( self->Name, avlstring[ 3 ] );
Escher_strcpy( self->GeneratedName, avlstring[ 4 ] );
self->AbaID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
self->Brg_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
return return_identifier;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_SWC_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_SWC * self = (ooaofooa_TE_SWC *) instance;
/* Initialize application analysis class attributes. */
Escher_strcpy( self->Obj_Kl, avlstring[ 1 ] );
Escher_strcpy( self->Where_Spec, avlstring[ 2 ] );
Escher_strcpy( self->Key, avlstring[ 3 ] );
self->Ret_Val = ( '0' != *avlstring[ 4 ] );
self->Built_In = ( '0' != *avlstring[ 5 ] );
self->Oid_ID = Escher_atoi( avlstring[ 6 ] );
Escher_strcpy( self->GeneratedName, avlstring[ 7 ] );
return return_identifier;
}
/*
* RELATE <left> X TO <right> X ACROSS R12.'is buddy of' USING Y
*/
void
assoc_unformal_Y_R12_Link_is_buddy_of( assoc_unformal_X * left, assoc_unformal_X * right, assoc_unformal_Y * assr )
{
if ( (left == 0) || (right == 0) || (assr == 0) ) {
XTUML_EMPTY_HANDLE_TRACE( "Y", "assoc_unformal_Y_R12_Link_is_buddy_of" );
return;
}
Escher_strcpy( assr->pal, left->name );
Escher_strcpy( assr->buddy, right->name );
/* Initialize optimized relationship storage extended attributes */
assr->X_R12_is_pal_of = left; /* RAL 1 */
assr->X_R12_is_buddy_of = right; /* RAL 2 */
Escher_SetInsertElement( &right->Y_R12_is_pal_of, assr ); /* RAL 8 */
Escher_SetInsertElement( &left->Y_R12_is_buddy_of, assr ); /* RAL 12 */
}
/*
* class operation: init
*/
monitor_vitalsign *
monitor_O2saturation_op_init()
{
monitor_O2saturation * O2saturation;monitor_vitalsign * vitalsign;
/* CREATE OBJECT INSTANCE O2saturation OF O2saturation */
XTUML_OAL_STMT_TRACE( 1, "CREATE OBJECT INSTANCE O2saturation OF O2saturation" );
O2saturation = (monitor_O2saturation *) Escher_CreateInstance( monitor_DOMAIN_ID, monitor_O2saturation_CLASS_NUMBER );
/* CREATE OBJECT INSTANCE vitalsign OF vitalsign */
XTUML_OAL_STMT_TRACE( 1, "CREATE OBJECT INSTANCE vitalsign OF vitalsign" );
vitalsign = (monitor_vitalsign *) Escher_CreateInstance( monitor_DOMAIN_ID, monitor_vitalsign_CLASS_NUMBER );
/* ASSIGN vitalsign.name = O2saturation */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN vitalsign.name = O2saturation" );
Escher_strcpy( vitalsign->name, "O2saturation" );
/* ASSIGN vitalsign.value = 0 */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN vitalsign.value = 0" );
vitalsign->value = 0;
/* ASSIGN vitalsign.yellow_threshold = 93 */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN vitalsign.yellow_threshold = 93" );
vitalsign->yellow_threshold = 93;
/* ASSIGN vitalsign.red_threshold = 85 */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN vitalsign.red_threshold = 85" );
vitalsign->red_threshold = 85;
/* RELATE O2saturation TO vitalsign ACROSS R2 */
XTUML_OAL_STMT_TRACE( 1, "RELATE O2saturation TO vitalsign ACROSS R2" );
monitor_O2saturation_R2_Link( vitalsign, O2saturation );
/* RETURN vitalsign */
XTUML_OAL_STMT_TRACE( 1, "RETURN vitalsign" );
{monitor_vitalsign * xtumlOALrv = vitalsign;
return xtumlOALrv;}
}
/*
* class operation: populate_image
*/
ooaofooa_DOC_CELL *
ooaofooa_DOC_CELL_op_populate_image( c_t * p_image, ooaofooa_DOC_CELL * p_predecessor )
{
ooaofooa_DOC_PAR * doc_par;ooaofooa_DOC_CELL * predecessor;ooaofooa_DOC_IMG * doc_img;ooaofooa_DOC_CELL * doc_cell;ooaofooa_DOC_SEC * empty_doc_sec=0;ooaofooa_DOC_PAR * empty_doc_par=0;
/* ASSIGN predecessor = PARAM.predecessor */
predecessor = p_predecessor;
/* CREATE OBJECT INSTANCE doc_cell OF DOC_CELL */
doc_cell = (ooaofooa_DOC_CELL *) Escher_CreateInstance( ooaofooa_DOMAIN_ID, ooaofooa_DOC_CELL_CLASS_NUMBER );
/* IF ( not_empty predecessor ) */
if ( ( 0 != predecessor ) ) {
/* RELATE predecessor TO doc_cell ACROSS R2304 */
ooaofooa_DOC_CELL_R2304_Link_follows( predecessor, doc_cell );
}
/* SELECT any empty_doc_par FROM INSTANCES OF DOC_PAR WHERE FALSE */
empty_doc_par = 0;
/* SELECT any empty_doc_sec FROM INSTANCES OF DOC_SEC WHERE FALSE */
empty_doc_sec = 0;
/* ASSIGN doc_par = DOC_PAR::populate(doc_sec:empty_doc_sec, predecessor:empty_doc_par, text:) */
doc_par = ooaofooa_DOC_PAR_op_populate(empty_doc_sec, empty_doc_par, "");
/* RELATE doc_par TO doc_cell ACROSS R2318 */
ooaofooa_DOC_CELL_R2318_Link( doc_par, doc_cell );
/* CREATE OBJECT INSTANCE doc_img OF DOC_IMG */
doc_img = (ooaofooa_DOC_IMG *) Escher_CreateInstance( ooaofooa_DOMAIN_ID, ooaofooa_DOC_IMG_CLASS_NUMBER );
/* RELATE doc_img TO doc_par ACROSS R2319 */
ooaofooa_DOC_IMG_R2319_Link( doc_par, doc_img );
/* ASSIGN doc_img.target = PARAM.image */
doc_img->target = Escher_strcpy( doc_img->target, p_image );
/* RETURN doc_cell */
{ooaofooa_DOC_CELL * xtumlOALrv = doc_cell;
return xtumlOALrv;}
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_TE_SELECT_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_TE_SELECT * self = (ooaofooa_TE_SELECT *) instance;
/* Initialize application analysis class attributes. */
self->o_obj = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
self->is_implicit = ( '0' != *avlstring[ 2 ] );
Escher_strcpy( self->class_name, avlstring[ 3 ] );
Escher_strcpy( self->target_class_name, avlstring[ 4 ] );
Escher_strcpy( self->class_description, avlstring[ 5 ] );
Escher_strcpy( self->multiplicity, avlstring[ 6 ] );
Escher_strcpy( self->var_name, avlstring[ 7 ] );
self->Statement_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 8 ] );
return return_identifier;
}
/*
* Interface: i2
* Provided Port: burn
* To Provider Message: o2
*/
i_t
c2_burn_o2( const i_t p_op2)
{
/* <message compname="c2" compnum="1" portname="burn" portnum="1" msgname="o2" msgnum="0"/> */
COMP_MSG_START_TRACE( "%d", 1, 1, 0, p_op2 );
c_t s[ESCHER_SYS_MAX_STRING_LEN]; i_t p;
/* ASSIGN s = 'tac burn' */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN s = 'tac burn'" );
Escher_strcpy( s, "tac burn" );
/* LOG::LogInfo( message:s ) */
XTUML_OAL_STMT_TRACE( 1, "LOG::LogInfo( message:s )" );
LOG_LogInfo( s );
/* ASSIGN p = PARAM.op2 */
XTUML_OAL_STMT_TRACE( 1, "ASSIGN p = PARAM.op2" );
p = p_op2;
/* IF ( ( 2 != PARAM.op2 ) ) */
XTUML_OAL_STMT_TRACE( 1, "IF ( ( 2 != PARAM.op2 ) )" );
if ( ( 2 != p_op2 ) ) {
/* LOG::LogFailure( message:'tac burn did not get 2' ) */
XTUML_OAL_STMT_TRACE( 2, "LOG::LogFailure( message:'tac burn did not get 2' )" );
LOG_LogFailure( "tac burn did not get 2" );
}
else {
/* RETURN ( lase::o2(3) + 1 ) */
XTUML_OAL_STMT_TRACE( 2, "RETURN ( lase::o2(3) + 1 )" );
return ( c2_lase_o2( 3 ) + 1 );
}
/* RETURN 0 */
XTUML_OAL_STMT_TRACE( 1, "RETURN 0" );
return 0;
}
/*
* Instance Loader (from string data).
*/
Escher_iHandle_t
ooaofooa_C_P_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
Escher_iHandle_t return_identifier = 0;
ooaofooa_C_P * self = (ooaofooa_C_P *) instance;
/* Initialize application analysis class attributes. */
self->Provision_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
Escher_strcpy( self->Name, avlstring[ 2 ] );
Escher_strcpy( self->InformalName, avlstring[ 3 ] );
{i_t i = avlstring[ 4 + 1 ] - avlstring[ 4 ];
self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 4 ][ i ]; }
}
Escher_strcpy( self->pathFromComponent, avlstring[ 5 ] );
return return_identifier;
}
