<<>> <> <> <> <> <> <> DIRECTORY Feedback, FeedbackClasses, IO, StandardStreams; FeedbackInitialCedarImpl: CEDAR PROGRAM IMPORTS Feedback, FeedbackClasses, StandardStreams = BEGIN Start: PROC ~ { stdout: IO.STREAM ~ StandardStreams.CreateStandardOutputStream[]; h1: Feedback.MsgHandler ~ FeedbackClasses.CreateHandlerOnStream[stdout, TRUE, NIL]; h2: Feedback.MsgHandler ~ FeedbackClasses.CreateStoringHandler[2000]; h12: Feedback.MsgHandler ~ FeedbackClasses.CreateSplittingHandler[h1, h2]; [] ¬ Feedback.SetGlobalDefaultHandlersBehavior[h12]; RETURN}; Start[]; END.