-- SA4000FaceExtras.mesa
-- Last Edited by: Taft, May 22, 1983 1:46 pm

DIRECTORY
  SA4000Face USING [Command];

SA4000FaceExtras: DEFINITIONS =
  BEGIN OPEN SA4000Face;

  -- Extension to the set of Commands
  -- Caution: code making use of this had better be compiled with bounds checking off.
  www: Command = LOOPHOLE[LOOPHOLE[LAST[Command], CARDINAL]+1, Command];

  END.