-- File: ByteBltDefs.Mesa,  Last Edit: HGM  November 12, 1979  5:48 PM

-- Copyright  Xerox Corporation 1979, 1980

DIRECTORY
  Stream: FROM "Stream" USING [Block];

ByteBltDefs: DEFINITIONS =
BEGIN


-- Moves as much as it can, and tells you how much that was
--   0 length in either to, or from is ok, it will just return 0
-- If you have startIndex>stopIndexPlusOne in either to or from, it will complain
--  since that doesn't make sense

-- Does a BLT for the easy case, otherwise is uses BitBlt to do the ripple
ByteBlt: PROCEDURE [to, from: Stream.Block] RETURNS [nBytes: CARDINAL];
  StartIndexGreaterThanStopIndexPlusOne: ERROR;


-- Used internally by ByteBlt on Alto
ShortenPointer: PROCEDURE [LONG POINTER] RETURNS [POINTER];
  HyperSpaceNotSupported: ERROR;
  NilRejected: ERROR;

END.(2048)