void BIStartComBlock( sym_id ste_ptr ) { //========================================= char name[MAX_SYMLEN+1]; if( _GenerateBrInfo() ) { memset( name, 0, MAX_SYMLEN+1 ); DWDeclPos( cBIId, CurrFile->rec, 0 ); currState |= BI_STATE_IN_COMMON_BLOCK; DWIncludeCommonBlock( cBIId, DWBeginCommonBlock( cBIId, justJunk, 0, strncpy( name, ste_ptr->u.ns.name, ste_ptr->u.ns.u2.name_len ), 0 ) ); } }
static void TestCommonBlock( void ) { dw_handle common_block; dw_loc_id id; dw_loc_handle loc; id = DWLocInit( Client ); DWLocStatic( Client, id, (dw_sym_handle)5 ); loc = DWLocFini( Client, id ); common_block = DWBeginCommonBlock( Client, loc, NULL, "DATA", 0 ); DWLocTrash( Client, loc ); id = DWLocInit( Client ); DWLocOp( Client, id, DW_LOC_plus_uconst, 4 ); loc = DWLocFini( Client, id ); DWVariable( Client, FundamentalTypes[DW_FT_UNSIGNED_CHAR], loc, 0, NULL, "UNCLE", 0, 0 ); DWLocTrash( Client, loc ); DWEndCommonBlock( Client ); DWIncludeCommonBlock( Client, common_block ); }