home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 220.lha / Tunnel / WBStart.def < prev    next >
Encoding:
Modula Definition  |  1996-02-15  |  782 b   |  34 lines
  1. (* USED IN DuM2.mod - Thanks *)
  2. (*
  3.  
  4.         This module determines if a task is running from
  5.         Workbench. If so, a procedure is provided to exit
  6.         properly without loosing memory.
  7.  
  8.         Created: 10/27/86 by Richie Bielak
  9.  
  10.         Modified:
  11.  
  12.         Copyright (c) 1986 by Richie Bielak.
  13.  
  14.         This program may be freely copied, but please leave
  15.         my name in. Thanks. Richie.
  16.  
  17. *)
  18. DEFINITION MODULE WBStart;
  19.  
  20.   FROM SYSTEM IMPORT ADDRESS;
  21.  
  22.  
  23.   (* Get WB Startup message - this procedure will return
  24.     NULL if the program is running from CLI.
  25.   *)
  26.   PROCEDURE GetWBStartUpMsg () : ADDRESS;
  27.  
  28.   (* Call to this procedure returns the startup message.
  29.      Call this procedure just before exiting your program.
  30.   *)
  31.   PROCEDURE ReturnWBStartUpMsg ();
  32.  
  33. END WBStart.
  34.