{
{            common deck dmdflaw
{

  TYPE
    dmt$ms_flaw_list = array [ * ] of dmt$flaw_list_entry,
    dmt$flaw_list_entry = RECORD
         dau_address:dmt$dau_address,
         number_flawed_daus:dmt$dau_address,
                          RECEND,
    dmt$flaw_map_address = record
      device_flaws_specified: boolean,
      mau_address: dmt$mau_address,
      mau_byte_offset: dmt$bytes_per_mau,
    recend,
    dmt$flaw_map_entry = packed record
      sector_flaw_entry: boolean,
      track_flaw_entry: boolean,
      cylinder: 0 .. 1023,
      track: 0 .. 63,
      sector: 0 .. 63,
    recend;

  CONST
    dmc$max_logical_flaws = 3,
    dmc$max_flaw_locations = 1;
?? PUSH (LISTEXT := ON) ??
*copyc DMT$MINIMUM_ALLOCATION_UNIT
*copyc DMT$DEVICE_POSITION
  ?? POP ??
