home *** CD-ROM | disk | FTP | other *** search
/ MACD 7 / MACD7.iso / mui / mcc_datetext / developer / modula / txt / mccdatetext.mod < prev   
Encoding:
Modula Implementation  |  1998-01-12  |  432 b   |  24 lines
  1. IMPLEMENTATION MODULE MCCDateText;
  2.  
  3. (*
  4. **
  5. ** Copyright © 1996 Kai Hofmann. All rights reserved.
  6. ** Registered MUI custom class!
  7. **
  8. ** $VER: MCCDateText.mod 12.0 (19.08.97)
  9. **
  10. *)
  11.  
  12.   FROM SYSTEM    IMPORT ADR,ADDRESS;
  13.   FROM MuiL    IMPORT mNewObject;
  14.   FROM UtilityD    IMPORT TagItemPtr;
  15.  
  16.  
  17.   PROCEDURE DateTextObject(tags : TagItemPtr) : ADDRESS;
  18.  
  19.   BEGIN
  20.     RETURN mNewObject(ADR(mcDateText),tags);
  21.   END DateTextObject;
  22.  
  23. END MCCDateText.
  24.