<> <> DIRECTORY IO, RefTab, TEditInputImpl; PrintTiogaRegistry: CEDAR PROGRAM IMPORTS IO, RefTab, TEditInputImpl SHARES TEditInputImpl ={ Print: PROC [to: IO.STREAM] = { PrintPair: PROC [key, val: REF ANY] RETURNS [quit: BOOLEAN] = { to.PutF["%g: %g\n", IO.refAny[key], IO.refAny[val]]; quit _ FALSE; }; [] _ TEditInputImpl.commandTable.Pairs[PrintPair]; }; }.