URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [binutils-2.18.50/] [gas/] [testsuite/] [gas/] [tic54x/] [struct.s] - Rev 816
Compare with Previous | Blame | View Log
* .struct * .union * .tag REAL_REC .struct ; stag = REAL_REC NUM .int ; NUM = 0 DEN .int ; DEN = 1 REAL_LEN .endstruct ; REAL_LEN = 2 add REAL + REAL_REC.DEN, a ; 000000 0001 .bss REAL, REAL_LEN ; 000000 0000 (len = 2) CPLX_REC .struct REALI .tag REAL_REC IMAGI .tag REAL_REC CPLX_LEN .endstruct ; apply the CPLX_REC structure format to .bss var COMPLEX .bss COMPLEX, CPLX_LEN ; 000002 0000 (len = 4) COMPLEX .tag CPLX_REC add COMPLEX.REALI, a ; 000001 0002 stl a, COMPLEX.REALI ; 000002 8002 add COMPLEX.IMAGI, b ; 000003 0104 ; anonymous struct; symbols become global .struct X .int Y .int Z .int .endstruct BIT_REC .struct STREAM .string 64 ; BIT7 .field 7 ; bit7 = 64 BIT9 .field 9 ; bit9 = 64 BIT10 .field 10 ; bit10 = 65 X_INT .int ; x_int = 66 BIT_LEN .endstruct ; bit_len = 67 .bss BITS, BIT_LEN ; 000006 0000 (len = 67) BITS .tag BIT_REC add BITS.BIT7,a ; 000004 0046 and #007Fh, a ; 000005 f030 ; 000006 007f .end