
  TYPE

    iot$moved_response_buffer = record
      case word_move: boolean of
      = TRUE =
        bytes: ALIGNED [0 MOD 8] array [0 .. ioc$min_response_length - 1] of
          ost$byte,
      = FALSE =
        response: ALIGNED [0 MOD 8] iot$pp_response,
      casend,
    recend;

*copyc OST$HARDWARE_SUBRANGES
*copyc IOT$PP_RESPONSE
