On Aug 17, 2010, at 08:32, Mark Hammack wrote:

> Yes, STGHEAD is in a DSECT:
>
> STGPOOL DSECT
> STGSIZE   DS         F
>
> As I said in the original e-mail, the "easy" thing to do would be to
> rearrange the dsect so that STGHEAD is on a doubleword boundary (i.e. move
> STGERR before STGHEAD and add DS 0D before the actual data).  However,
> finding all of the procedures that rely on this particular layout may be
> difficult.  But I will be changing it in a future release of the software.
>
With greater compatibility with existing procedures,
could you do:

STGXXX   DSECT
STGPOOL  EQU   *-4
STGSIZE  EQU   *-4
STGHEAD  DS    A
STGCNT   DS    F
STGERR   DS    F

Or:

STGXXX   DSECT
         DS    A     (Force weird alignment)
STGPOOL  EQU   *
STGSIZE  DS    F
STGHEAD  DS    A
STGCNT   DS    F
STGERR   DS    F

Or even:

STGXXX   DSECT
         ORG   *-4    (Does HLASM permit this?)
STGPOOL  EQU   *
STGSIZE  DS    F
STGHEAD  DS    A
STGCNT   DS    F
STGERR   DS    F

No rearrangements of existing offsets.

-- gil

Reply via email to