FTS1_BSWAP

Swaps adjacent bytes in an array of bytes

Description:

This swaps adjacent pairs of bytes in an array in situ. This is VAX specific.

Invocation

CALL FTS1_BSWAP( NBYTE, BYTES, STATUS )

Arguments

NBYTE = INTEGER (Returned)
Number of bytes. An SAI__ERROR will be returned if this is not an even number.
BYTES( NBYTE ) = BYTE (Given and Returned)
The 16-bit words whose bytes are to be swapped.
STATUS = INTEGER (Given and Returned)
The global status.