-- PDUser.mesa
-- Copyright (C) 1984, 1986 Xerox Corporation.  All rights reserved.
-- Michael Plass, September 4, 1984 1:58:46 pm PDT
-- Tim Diebert,  5-Sep-86 12:45:01
-- 
DIRECTORY Stream USING [Handle];

PDUser: DEFINITIONS = BEGIN
  -- This module provides a chat-style user interface to the peach printer.
  -- Normally one instance of this will be running on the printer's tty, and
  -- an instance will exist for each open Chat connection.  This module, however,
  -- does not create any instances.
    
  TalkWithUser: PROC [stream: Stream.Handle, local: BOOL ← FALSE];
    -- Exits when user quits or the connection is broken.
    -- Assumes a bi-directional stream.
    
  END.