formsvbt/src/StubImageRd.m3


Copyright (C) 1994, Digital Equipment Corp.

MODULE StubImageRd;

IMPORT PaintOp, VBT, Rd;

REVEAL T = Public BRANDED OBJECT
  OVERRIDES
    init := Init;
  END;

<*NOWARN *> PROCEDURE Init(t: T; rd: Rd.T; start, length: CARDINAL;
<*NOWARN *>   op: PaintOp.T := PaintOp.Copy;st: VBT.ScreenType := NIL; gamma: REAL := 1.0):
  T = BEGIN RETURN t END Init;

BEGIN
END StubImageRd.