home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / Clean 1.2.4 / PowerMacInterface / notification.icl < prev    next >
Encoding:
Modula Implementation  |  1995-02-14  |  334 b   |  16 lines  |  [TEXT/3PRM]

  1. implementation module notification;
  2.  
  3. import mac_types;
  4.  
  5. ::    NMRecPtr :== Int;
  6.  
  7. NMInstall :: !NMRecPtr !Toolbox -> (!Int,!Toolbox);
  8. NMInstall nmReqPtr t = code (nmReqPtr=D0,t=U)(r=D0,z=Z){
  9.     call    .NMInstall
  10. };
  11.  
  12. NMRemove :: !NMRecPtr !Toolbox -> (!Int,!Toolbox);
  13. NMRemove nmReqPtr t = code (nmReqPtr=D0,t=U)(r=D0,z=Z){
  14.     call    .NMRemove
  15. };
  16.