home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / MacOberonLite 1.0.1 / Sys Files / MacOSUtils.Mod (.txt) < prev    next >
Encoding:
Oberon Text  |  1993-06-27  |  715 b   |  17 lines  |  [.Ob./.Ob4]
  1. Syntax10.Scn.Fnt
  2. Syntax10b.Scn.Fnt
  3. MODULE MacOSUtils;
  4. (* This Module contains all essentiel constants, datatypes and routines from the NEW Inside Macintosh
  5.             Operating System Utilities
  6.     However this implementation is NOT complete. If use miss some items, please use Inside Mac
  7.     and complete this module for your needs.
  8.     See the documentation ( MakeMacApp.Doc ) for more information about the usage of this module
  9. IMPORT SYSTEM,ME:=MacMemory;
  10. (* Gestalt , register-based *)
  11.     PROCEDURE- Gestalt*    0A1H,0ADH;
  12.     PROCEDURE- NewGestalt*    0A3H,0ADH;
  13.     PROCEDURE- ReplaceGestalt*    0A5H,0ADH;
  14. (* Other *)
  15.     PROCEDURE- GetCursor*(cursorID : INTEGER) : ME.Handle    0A9H,0B9H;
  16. END MacOSUtils.
  17.