home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d6xx / d658 / view.lha / View / Source / Messages.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-05-15  |  1.1 KB  |  52 lines
  1. /*-- AutoRev header do NOT edit!
  2. *
  3. *   Program         :   Messages.c
  4. *   Copyright       :   Copyright © 1991-92 Jaba Development
  5. *   Author          :   Jan van den Baard
  6. *   Creation Date   :   04-Apr-92
  7. *   Current version :   2.0
  8. *   Translator      :   Dice v2.06.40
  9. *
  10. *   REVISION HISTORY
  11. *
  12. *   Date          Version         Comment
  13. *   ---------     -------         ------------------------------------------
  14. *   04-Apr-92     2.0             Message routines. (rewrite)
  15. *
  16. *-- REV_END --*/
  17.  
  18. #include "View.h"
  19.  
  20. Prototype long ReadMsgPort( struct MsgPort * );
  21. Prototype void ClearMsgPort( struct MsgPort * );
  22.  
  23. ULONG                   vwClass;
  24. UWORD                   vwCode, vwQualifier;
  25.  
  26. long ReadMsgPort( struct MsgPort *port )
  27. {
  28.     struct IntuiMessage *msg;
  29.  
  30.     if ( msg = GT_GetIMsg( port )) {
  31.  
  32.         vwClass     = msg->Class;
  33.         vwCode      = msg->Code;
  34.         vwQualifier = msg->Qualifier;
  35.  
  36.         GT_ReplyIMsg( msg );
  37.  
  38.         return( TRUE );
  39.     }
  40.  
  41.     return( FALSE );
  42. }
  43.  
  44. void ClearMsgPort( struct MsgPort *port )
  45. {
  46.     struct Message  *msg;
  47.  
  48.     Forbid();
  49.     while( msg = GetMsg( port )) ReplyMsg( msg );
  50.     Permit();
  51. }
  52.