Data Definition Language (DDL) Reference Manual (G06.24+)

Definition Attributes
Data Definition Language (DDL) Reference Manual—426798-002
6-66
TYPE Clause
Bit Field Output for FORTRAN. The following examples show how DDL translates
definitions and descriptions of bit fields into FORTRAN source code:
DDL Type FORTRAN Type
DEF Bit-1 TYPE BIT 1
DEF New-Bit-1 TYPE Bit-1.
DEF Bit-10 TYPE BIT 10 UNSIGNED.
INTEGER*2 BIT1
INTEGER*2 NEWBIT1
INTEGER*2 BIT10
DEF Bit-Map.
2 Bits-8 TYPE BIT 8.
2 Bits-3 TYPE BIT 3 UNSIGNED.
2 Bits-10 TYPE BIT 10.
End.
RECORD BITMAP
FILLER*2
FILLER*2
END RECORD
DEF Bit-Struct.
2 Bits-0 TYPE Bit-1.
2 Bits-1-To-10 TYPE Bit-10.
End.
RECORD BITSTRUCT
FILLER*2
END RECORD
DEF Bit-Fillers.
2 Field-1 Type Character 3.
2 Filler Type Bit 4.
2 Bit-Field-1 Type Bit 5.
2 Filler Type Binary 16.
2 Field-2 Type Binary 32.
End.
RECORD BITFILLERS
CHARACTER*3 FIELD1
C the following filler is implicit
FILLER*1
C the following filler is bit maps
FILLER*2
C the following filler is explicit
FILLER*2
INTEGER*4 FIELD2
END RECORD