HP Fortran Programmer's Reference

HP Fortran statements
STRUCTURE (extension)
STRUCTURE /sixbytes/
INTEGER(KIND=2) :: twobytes
CHARACTER(LEN=4) :: %FILL
END STRUCTURE
%FILL can be of any type and may appear more than once in a structure.
%FILL should not be needed in normal usage. The compiler automatically adds padding to
ensure proper alignment.
Nested structures
A field-def can itself be a structure definition, known as a nested structure. The syntax of a
nested structure definition is:
STRUCTURE /struct-name/struct-field-list
field-def
...
END STRUCTURE
struct-name is the structure’s name (delimited by slashes), which can be used later to
declare a record.
struct-field-list is a comma-separated list of one or more names of nested structure field
names.
field-def can be one of the following regular field definitions (defined in the same way
as an unnested structure field):
434
A type declaration statement
Another nested structure
A nested record
A union definition
NOTE Note that a structure definition allows multiple levels of
nesting.
A nested structure definition is the same as an unnested structure definition, with two
exceptions:
/struct-name/ is optional in a nested structure.
A nested structure definition must include a list of one or more structure field names
(struct-field-list).
Chapter 10