-- Copyright (C) 1984  by Xerox Corporation. All rights reserved. 
-- PhoneNetExtras.mesa, HGM, 14-Aug-84 22:54:38
-- Hacks for getting more info via PhoneNetFriends

DIRECTORY
  PhoneNetFriends USING [PhoneNetEvents];

PhoneNetExtras: DEFINITIONS =
  BEGIN
  
  pupCongestion: PhoneNetFriends.PhoneNetEvents = pkt;
  nsCongestion: PhoneNetFriends.PhoneNetEvents = pktPlus;
  pupTooGreedy: PhoneNetFriends.PhoneNetEvents = ltaArrived;
  nsTooGreedy: PhoneNetFriends.PhoneNetEvents = sendAPktTO;
  
  END...