-- DisplayExtras.mesa    modified 10-Mar-82 11:39:03 by Taft

DIRECTORY
  Mopcodes USING [zMISC];

DisplayExtras: DEFINITIONS =
  BEGIN

  FieldRate: TYPE = MACHINE DEPENDENT {
    alto60hz (2B), lf77hz (11B), lf60hz (213B), (LAST [INTEGER])};

  SetFieldRate: PROCEDURE [new: FieldRate] RETURNS [old: FieldRate] =
    MACHINE CODE { Mopcodes.zMISC, 253B };

  END.