
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.
  B  
FeedbackInitialCedarImpl.mesa
Copyright Ó 1990, 1991, 1993 by Xerox Corporation.  All rights reserved.
Copyright protection claimed includes all forms and matters of copyrightable material and information now allowed by statutory or judicial law or hereinafter granted, including without limitation, material generated from the software programs which are displayed on the screen such as icons, screen display looks, character bitmaps, etc.
Last tweaked by Mike Spreitzer on May 1, 1990 11:00:59 am PDT
Bier, May 1, 1990 11:11 pm PDT
Willie-s, June 23, 1993 3:18 pm PDT
 Ê  •NewlineDelimiter
–(cedarcode) style™ codešœ™Kšœ
Ïeœ=™HI	finepoint™ÑK™=K™K™#—K˜ KšÏk	œžœœ˜9K˜ šÏnœžœž˜'Kšžœœ˜2K˜—K˜ Kšž˜K˜ šŸœžœ˜Kšœžœžœ0˜AKšœHžœžœ˜SKšœE˜EKšœJ˜JKšœ4˜4Kšžœ˜—K˜ K˜K˜ Kšžœ˜— …—    &  w  