cit_util/src/RTBrand.i3


 $Id: RTBrand.i3.html,v 1.3 2010-04-29 17:17:56 wagner Exp $ 
INTERFACE RTBrand;
IMPORT RT0;

EXCEPTION NotBranded;

PROCEDURE Get(x : REFANY) : TEXT RAISES { NotBranded } ;
PROCEDURE GetByTC(tc : RT0.Typecode) : TEXT RAISES { NotBranded } ;
END RTBrand.