anim3D/src/MouseCBProxy.i3


Copyright (C) 1994, Digital Equipment Corp.
Digital Internal Use Only
                                                                           
       Created on Fri Jul 22 16:10:48 PDT 1994 by najork                   

INTERFACE MouseCBProxy;

IMPORT CB, ProxiedObj;

FROM MouseCB IMPORT T, Rec;
The Proxy Maker (PM) procedure for MouseCB.T is registered by assigning it to MkProxyT.

VAR
  MkProxyT : PROCEDURE (x : T) := NIL;

TYPE
  Proxy = ProxiedObj.Proxy OBJECT
  METHODS
    invoke (mr : Rec) RAISES {CB.BadMethod};
  END;

END MouseCBProxy.