sunion.gml

开放源码的编译器open watcom 1.6.0版的源代码

.section UNION Statement
.*
.mext begin
      UNION
.mext end
.np
The
.kw UNION
statement is used in conjunction with the
.kw END UNION
declarative statement.
The
.kw UNION
statement marks the start of a series of
.kw MAP
structures.
A
.kw UNION
block must contain at least two
.kw MAP
structures.
A
.kw UNION
block permits the mapping of the same storage in several different
ways.
.np
The following example maps out a 4-byte integer on an Intel
80x86-based processor.
.exam begin
      STRUCTURE /MAPINT/
          UNION
              MAP
                  INTEGER*4 LONG
              END MAP
              MAP
                  INTEGER*2 LO_WORD
                  INTEGER*2 HI_WORD
              END MAP
              MAP
                  INTEGER*1 BYTE_0
                  INTEGER*1 BYTE_1
                  INTEGER*1 BYTE_2
                  INTEGER*1 BYTE_3
              END MAP
          END UNION
      END STRUCTURE

      RECORD /MAPINT/ I

      I%LONG = '01020304'x
      PRINT '(2Z4)', I%LO_WORD, I%HI_WORD
      END
.exam end
.np
For more information, see the chapter entitled :HDREF refid='frecord'..