Пример #1
0
/*
 * Create an instance of the class numbered on the input.
 * Return the handle of the created instance.
 */
Escher_iHandle_t
Escher_CreateInstance(
    const Escher_DomainNumber_t domain_num,
    const Escher_ClassNumber_t class_num
)
{
    Escher_SetElement_s * node;
    Escher_iHandle_t instance;
    Escher_Extent_t * dci = *(domain_class_info[ domain_num ] + class_num);
    node = dci->inactive.head;

    if ( 0 == node ) {
        Escher_SetElement_s * container =
            ( Escher_SetElement_s *) Escher_malloc( 10 * sizeof( Escher_SetElement_s ) );
        Escher_iHandle_t pool = ( Escher_iHandle_t ) Escher_malloc( 10 * dci->size );
        if ( ( 0 == container ) || ( 0 == pool ) ) {
            UserObjectPoolEmptyCallout( domain_num, class_num );
        } else {
            Escher_memset( pool, 0, 10 * dci->size );
            dci->inactive.head = Escher_SetInsertBlock(
                                     container, (const u1_t *) pool, dci->size, 10 );
            node = dci->inactive.head;
        }
    }

    dci->inactive.head = dci->inactive.head->next;
    instance = (Escher_iHandle_t) node->object;
    instance->current_state = dci->initial_state;
    Escher_SetInsertInstance( &dci->active, node );
    return instance;
}
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_TE_EE_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_TE_EE * self = (ooaofooa_TE_EE *) instance;
  /* Initialize application analysis class attributes.  */
  self->Name = Escher_strcpy( self->Name, avlstring[ 1 ] );
  self->RegisteredName = Escher_strcpy( self->RegisteredName, avlstring[ 2 ] );
  self->Key_Lett = Escher_strcpy( self->Key_Lett, 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 ]; }
  }
  self->Included = ( '0' != *avlstring[ 5 ] );
  self->file = Escher_strcpy( self->file, avlstring[ 6 ] );
  self->Include_File = Escher_strcpy( self->Include_File, avlstring[ 7 ] );
  self->Used = ( '0' != *avlstring[ 8 ] );
  self->te_cID = (Escher_iHandle_t) Escher_atoi( avlstring[ 9 ] );
  self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 10 ] );
  self->ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 11 ] );
  self->nextID = (Escher_iHandle_t) Escher_atoi( avlstring[ 12 ] );
  self->RealizedIncludeFile = Escher_strcpy( self->RealizedIncludeFile, avlstring[ 13 ] );
  self->IsMarkAsRealized = ( '0' != *avlstring[ 14 ] );
  return return_identifier;
}
Пример #3
0
/*
 * Insert a single element into the set in no particular order.
 * The element is a data item.  A container node will be allocated
 * to link in the element.
 */
void
Escher_SetInsertElement(
    Escher_ObjectSet_s * set,
    void * const substance
)
{
    Escher_SetElement_s * slot;
    if ( 0 == node1_FreeList.head ) {
        Escher_SetElement_s * new_mem = ( Escher_SetElement_s *) Escher_malloc( 10 * sizeof( Escher_SetElement_s ) );
        if ( 0 == new_mem ) {
            UserNodeListEmptyCallout(); /* Bad news!  No more heap space.  */
        } else {
            i_t i;
            for ( i = 0; i < 10 - 1; i++ ) {
                new_mem[ i ].next = (Escher_SetElement_s *) &(new_mem[ i + 1 ]);
            }
            new_mem[ 10 - 1 ].next = 0;
            node1_FreeList.head = new_mem;
        }
    }
    slot = node1_FreeList.head; /* Extract node from free list head. */
    node1_FreeList.head = node1_FreeList.head->next;
    slot->object = substance;
    slot->next = set->head;     /* Insert substance at list front.   */
    set->head = slot;
}
Пример #4
0
/*
 * 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;
}
Пример #5
0
/*
 * 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;
}
Пример #6
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_SPR_PS_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_SPR_PS * self = (ooaofooa_SPR_PS *) instance;
  /* Initialize application analysis class attributes.  */
  self->Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  {i_t i = avlstring[ 4 + 1 ] - avlstring[ 4 ];
  self->Action_Semantics_internal = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Action_Semantics_internal[ i ] = avlstring[ 4 ][ i ]; }
  }
  self->Suc_Pars = Escher_atoi( avlstring[ 5 ] );
  return return_identifier;
}
Пример #7
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_UC_BA_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_UC_BA * self = (ooaofooa_UC_BA *) instance;
  /* Initialize application analysis class attributes.  */
  self->Assoc_ID = (Escher_iHandle_t) Escher_atoi( 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 ]; }
  }
  return return_identifier;
}
Пример #8
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_S_BRG_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_S_BRG * self = (ooaofooa_S_BRG *) instance;
  /* Initialize application analysis class attributes.  */
  self->Brg_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->Brg_ID;
  self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Name = Escher_strcpy( self->Name, 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 ]; }
  }
  self->Brg_Typ = Escher_atoi( avlstring[ 5 ] );
  self->DT_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
  {i_t i = avlstring[ 7 + 1 ] - avlstring[ 7 ];
  self->Action_Semantics_internal = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Action_Semantics_internal[ i ] = avlstring[ 7 ][ i ]; }
  }
  self->Suc_Pars = Escher_atoi( avlstring[ 8 ] );
  self->Return_Dimensions = Escher_strcpy( self->Return_Dimensions, avlstring[ 9 ] );
  return return_identifier;
}
Пример #9
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_SQ_AP_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_SQ_AP * self = (ooaofooa_SQ_AP *) instance;
  /* Initialize application analysis class attributes.  */
  self->Part_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  self->LS_Part_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
  return return_identifier;
}
Пример #10
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_TE_DISP_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_TE_DISP * self = (ooaofooa_TE_DISP *) instance;
  /* Initialize application analysis class attributes.  */
  self->Dispatcher_ID = Escher_atoi( avlstring[ 1 ] );
  self->SystemID = Escher_atoi( avlstring[ 2 ] );
  self->Name = Escher_strcpy( self->Name, 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 ]; }
  }
  return return_identifier;
}
Пример #11
0
/*
 * Copy characters and be paranoid about null delimiter.
 */
c_t *
Escher_strcpy( c_t * dst, const c_t * src )
{
    c_t * s = dst;
    if ( 0 != src ) {
        Escher_size_t i = Escher_strlen( src ) + 1;
        s = Escher_malloc( i );
        dst = s;
        while ( ( i > 0 ) && ( *src != '\0' ) ) {
            --i;
            *dst++ = *src++;
        }
        *dst = '\0';  /* Ensure delimiter.  */
    }
    return s;
}
Пример #12
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_SM_EIGN_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_SM_EIGN * self = (ooaofooa_SM_EIGN *) instance;
  /* Initialize application analysis class attributes.  */
  self->SMstt_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->SMevt_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->SM_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
  self->SMspd_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
  {i_t i = avlstring[ 5 + 1 ] - avlstring[ 5 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 5 ][ i ]; }
  }
  return return_identifier;
}
Пример #13
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;
}
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_SQ_EEP_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_SQ_EEP * self = (ooaofooa_SQ_EEP *) instance;
  /* Initialize application analysis class attributes.  */
  self->Part_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Label = Escher_strcpy( self->Label, avlstring[ 3 ] );
  self->InformalName = Escher_strcpy( self->InformalName, avlstring[ 4 ] );
  {i_t i = avlstring[ 5 + 1 ] - avlstring[ 5 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 5 ][ i ]; }
  }
  self->isFormal = ( '0' != *avlstring[ 6 ] );
  return return_identifier;
}
Пример #15
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_EP_PKG_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_EP_PKG * self = (ooaofooa_EP_PKG *) instance;
  /* Initialize application analysis class attributes.  */
  self->Package_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->Sys_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Direct_Sys_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
  Escher_strcpy( self->Name, avlstring[ 4 ] );
  {i_t i = avlstring[ 5 + 1 ] - avlstring[ 5 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 5 ][ i ]; }
  }
  self->Num_Rng = Escher_atoi( avlstring[ 6 ] );
  return return_identifier;
}
Пример #16
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_TE_C_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_TE_C * self = (ooaofooa_TE_C *) instance;
  /* Initialize application analysis class attributes.  */
  self->ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->ID;
  Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  self->number = Escher_atoi( avlstring[ 4 ] );
  self->StateTrace = ( '0' != *avlstring[ 5 ] );
  self->StmtTrace = ( '0' != *avlstring[ 6 ] );
  self->DetectEmpty = ( '0' != *avlstring[ 7 ] );
  self->OptDisabled = ( '0' != *avlstring[ 8 ] );
  self->RawComments = ( '0' != *avlstring[ 9 ] );
  self->CodeComments = ( '0' != *avlstring[ 10 ] );
  self->CollectionsFlavor = Escher_atoi( avlstring[ 11 ] );
  Escher_strcpy( self->classes_file, avlstring[ 12 ] );
  Escher_strcpy( self->functions_file, avlstring[ 13 ] );
  self->MaxObjExtent = Escher_atoi( avlstring[ 14 ] );
  self->MaxRelExtent = Escher_atoi( avlstring[ 15 ] );
  self->MaxSelectExtent = Escher_atoi( avlstring[ 16 ] );
  self->MaxSelfEvents = Escher_atoi( avlstring[ 17 ] );
  self->MaxNonSelfEvents = Escher_atoi( avlstring[ 18 ] );
  self->MaxPriorityEvents = Escher_atoi( avlstring[ 19 ] );
  self->MaxTimers = Escher_atoi( avlstring[ 20 ] );
  self->InterleavedBridges = Escher_atoi( avlstring[ 21 ] );
  self->PEIClassCount = Escher_atoi( avlstring[ 22 ] );
  self->PersistentClassCount = Escher_atoi( avlstring[ 23 ] );
  Escher_strcpy( self->module_file, avlstring[ 24 ] );
  Escher_strcpy( self->port_file, avlstring[ 25 ] );
  Escher_strcpy( self->include_file, avlstring[ 26 ] );
  self->included_in_build = ( '0' != *avlstring[ 27 ] );
  self->internal_behavior = ( '0' != *avlstring[ 28 ] );
  self->isRealized = ( '0' != *avlstring[ 29 ] );
  self->SystemID = Escher_atoi( avlstring[ 30 ] );
  self->next_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 31 ] );
  self->cId = (Escher_iHandle_t) Escher_atoi( avlstring[ 32 ] );
  self->first_eeID = (Escher_iHandle_t) Escher_atoi( avlstring[ 33 ] );
  self->first_syncID = (Escher_iHandle_t) Escher_atoi( avlstring[ 34 ] );
  return return_identifier;
}
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_CP_CP_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_CP_CP * self = (ooaofooa_CP_CP *) instance;
  /* Initialize application analysis class attributes.  */
  self->Package_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->ParentLink_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Sys_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
  self->Containing_Sys_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
  self->Name = Escher_strcpy( self->Name, avlstring[ 5 ] );
  {i_t i = avlstring[ 6 + 1 ] - avlstring[ 6 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 6 ][ i ]; }
  }
  return return_identifier;
}
Пример #18
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_MSG_R_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_MSG_R * self = (ooaofooa_MSG_R *) instance;
  /* Initialize application analysis class attributes.  */
  self->Msg_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  Escher_strcpy( self->GuardCondition, avlstring[ 4 ] );
  Escher_strcpy( self->ResultTarget, avlstring[ 5 ] );
  Escher_strcpy( self->ReturnValue, avlstring[ 6 ] );
  Escher_strcpy( self->SequenceNumb, avlstring[ 7 ] );
  return return_identifier;
}
Пример #19
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_S_SS_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_S_SS * self = (ooaofooa_S_SS *) instance;
  /* Initialize application analysis class attributes.  */
  self->SS_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->SS_ID;
  Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  Escher_strcpy( self->Prefix, avlstring[ 4 ] );
  self->Num_Rng = Escher_atoi( avlstring[ 5 ] );
  self->Dom_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 6 ] );
  self->Config_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
  return return_identifier;
}
Пример #20
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_CL_IC_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_CL_IC * self = (ooaofooa_CL_IC *) instance;
  /* Initialize application analysis class attributes.  */
  self->Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->AssignedComp_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->ParentComp_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
  self->Component_Package_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
  self->Mult = Escher_atoi( avlstring[ 5 ] );
  self->ClassifierName = Escher_strcpy( self->ClassifierName, avlstring[ 6 ] );
  self->Name = Escher_strcpy( self->Name, avlstring[ 7 ] );
  {i_t i = avlstring[ 8 + 1 ] - avlstring[ 8 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 8 ][ i ]; }
  }
  return return_identifier;
}
Пример #21
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_S_EE_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_S_EE * self = (ooaofooa_S_EE *) instance;
  /* Initialize application analysis class attributes.  */
  self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->Name = Escher_strcpy( self->Name, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  self->Key_Lett = Escher_strcpy( self->Key_Lett, avlstring[ 4 ] );
  self->Dom_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
  self->Realized_Class_Path = Escher_strcpy( self->Realized_Class_Path, avlstring[ 6 ] );
  self->Label = Escher_strcpy( self->Label, avlstring[ 7 ] );
  self->isRealized = ( '0' != *avlstring[ 8 ] );
  return return_identifier;
}
Пример #22
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_O_TPARM_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_O_TPARM * self = (ooaofooa_O_TPARM *) instance;
  /* Initialize application analysis class attributes.  */
  self->TParm_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->TParm_ID;
  self->Tfr_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  Escher_strcpy( self->Name, avlstring[ 3 ] );
  self->DT_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 4 ] );
  self->By_Ref = Escher_atoi( avlstring[ 5 ] );
  Escher_strcpy( self->Dimensions, avlstring[ 6 ] );
  self->Previous_TParm_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
  {i_t i = avlstring[ 8 + 1 ] - avlstring[ 8 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 8 ][ i ]; }
  }
  return return_identifier;
}
Пример #23
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_C_C_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_C_C * self = (ooaofooa_C_C *) instance;
  /* Initialize application analysis class attributes.  */
  self->Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  self->Package_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->NestedComponent_Id = (Escher_iHandle_t) Escher_atoi( avlstring[ 3 ] );
  Escher_strcpy( self->Name, avlstring[ 4 ] );
  {i_t i = avlstring[ 5 + 1 ] - avlstring[ 5 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 5 ][ i ]; }
  }
  self->Mult = Escher_atoi( avlstring[ 6 ] );
  self->Root_Package_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
  self->isRealized = ( '0' != *avlstring[ 8 ] );
  Escher_strcpy( self->Realized_Class_Path, avlstring[ 9 ] );
  return return_identifier;
}
Пример #24
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_SM_EVTDI_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_SM_EVTDI * self = (ooaofooa_SM_EVTDI *) instance;
  /* Initialize application analysis class attributes.  */
  self->SMedi_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->SMedi_ID;
  self->SM_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Name = Escher_strcpy( self->Name, 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 ]; }
  }
  self->DT_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 5 ] );
  self->Dimensions = Escher_strcpy( self->Dimensions, avlstring[ 6 ] );
  self->SMevt_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 7 ] );
  self->Previous_SMedi_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 8 ] );
  return return_identifier;
}
Пример #25
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_MSG_AM_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_MSG_AM * self = (ooaofooa_MSG_AM *) instance;
  /* Initialize application analysis class attributes.  */
  self->Msg_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  Escher_strcpy( self->InformalName, avlstring[ 2 ] );
  {i_t i = avlstring[ 3 + 1 ] - avlstring[ 3 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 3 ][ i ]; }
  }
  Escher_strcpy( self->GuardCondition, avlstring[ 4 ] );
  Escher_strcpy( self->DurationObservation, avlstring[ 5 ] );
  Escher_strcpy( self->DurationConstraint, avlstring[ 6 ] );
  self->isFormal = ( '0' != *avlstring[ 7 ] );
  Escher_strcpy( self->Label, avlstring[ 8 ] );
  Escher_strcpy( self->SequenceNumb, avlstring[ 9 ] );
  return return_identifier;
}
Пример #26
0
/*
 * Instance Loader (from string data).
 */
Escher_iHandle_t
ooaofooa_S_EEEVT_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_iHandle_t return_identifier = 0;
  ooaofooa_S_EEEVT * self = (ooaofooa_S_EEEVT *) instance;
  /* Initialize application analysis class attributes.  */
  self->EEevt_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->EEevt_ID;
  self->EE_ID = (Escher_iHandle_t) Escher_atoi( avlstring[ 2 ] );
  self->Numb = Escher_atoi( avlstring[ 3 ] );
  self->Mning = Escher_strcpy( self->Mning, avlstring[ 4 ] );
  self->Is_Lbl_U = Escher_atoi( avlstring[ 5 ] );
  self->Unq_Lbl = Escher_strcpy( self->Unq_Lbl, avlstring[ 6 ] );
  self->Drv_Lbl = Escher_strcpy( self->Drv_Lbl, avlstring[ 7 ] );
  {i_t i = avlstring[ 8 + 1 ] - avlstring[ 8 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 8 ][ i ]; }
  }
  return return_identifier;
}
Пример #27
0
/*
 * Instance Loader (from string data).
 */
Escher_UniqueID_t
masl2xtuml_O_ATTR_instanceloader( Escher_iHandle_t instance, const c_t * avlstring[] )
{
  Escher_UniqueID_t return_identifier = 0;
  masl2xtuml_O_ATTR * self = (masl2xtuml_O_ATTR *) instance;
  /* Initialize application analysis class attributes.  */
  self->Attr_ID = Escher_atoi( avlstring[ 1 ] );
  return_identifier = self->Attr_ID;
  self->Obj_ID = Escher_atoi( avlstring[ 2 ] );
  self->PAttr_ID = Escher_atoi( avlstring[ 3 ] );
  self->Name = Escher_strcpy( self->Name, avlstring[ 4 ] );
  {i_t i = avlstring[ 5 + 1 ] - avlstring[ 5 ];
  self->Descrip = ( i > 0 ) ? (c_t *) Escher_malloc( i ) : "";
  while ( --i >= 0 ) { self->Descrip[ i ] = avlstring[ 5 ][ i ]; }
  }
  self->Prefix = Escher_strcpy( self->Prefix, avlstring[ 6 ] );
  self->Root_Nam = Escher_strcpy( self->Root_Nam, avlstring[ 7 ] );
  self->Pfx_Mode = Escher_atoi( avlstring[ 8 ] );
  self->DT_ID = Escher_atoi( avlstring[ 9 ] );
  self->Dimensions = Escher_strcpy( self->Dimensions, avlstring[ 10 ] );
  self->DefaultValue = Escher_strcpy( self->DefaultValue, avlstring[ 11 ] );
  return return_identifier;
}
Пример #28
0
/*
 * Obtain an empty event from the free list.
 */
Escher_xtUMLEvent_t * Escher_AllocatextUMLEvent( void )
{
    Escher_xtUMLEvent_t * event = 0;
    if ( free_event_list == 0 ) {
        Escher_xtUMLEvent_t * new_mem = (Escher_xtUMLEvent_t *) Escher_malloc( 10 * sizeof( Escher_systemxtUMLevents_t ) );

        if ( 0 == new_mem ) {
            UserEventFreeListEmptyCallout();   /* Bad news!  No more heap space.  */
        } else {
            u1_t i;
            for ( i = 0; i < 10 - 1; i++ ) {
                new_mem[ i ].next = (Escher_xtUMLEvent_t *) &(new_mem[ i + 1 ]);
            }
            new_mem[ 10 - 1 ].next = 0;
            free_event_list = new_mem;
            event = Escher_AllocatextUMLEvent();
        }
    } else {
        event = free_event_list;       /* Grab front of the free list.  */
        free_event_list = event->next; /* Unlink from front of free list.  */
    }
    return event;
}