PreViewClient:
CEDAR DEFINITIONS =
BEGIN
SwitchRange: TYPE = CHAR['A..'Z];
Switches: TYPE = PACKED ARRAY SwitchRange OF BOOLEAN;
NameList: TYPE = LIST OF Rope.ROPE;
CreatePreViewer: PROC [fileNames: NameList, switches: Switches] RETURNS [preViewer: ViewerClasses.Viewer];