{ DECK: DFT$MOVED_FS_RESPONSE_BUFFER

   TYPE
     dft$moved_fs_response_buffer = record
       CASE word_move: boolean OF
       = TRUE =
         bytes: ALIGNED [0 MOD 8] ARRAY [0 .. dfc$max_fs_pp_response_length DIV 8] OF ost$byte,
       = FALSE =
         response: ALIGNED [0 MOD 8] dft$fs_error_log_response,
       CASEND,
     recend;

   CONST
     dfc$max_fs_pp_response_length = 6 * 8;

*copyc dft$fs_error_log_response
*copyc ost$byte
