home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / Moscow ML 1.42 / e_SML / gc_stat.sml < prev    next >
Encoding:
Text File  |  1995-09-19  |  724 b   |  30 lines  |  [TEXT/Moml]
  1.  
  2.  
  3. type gc_status =
  4.    { fragments         : int,
  5.      free_blocks       : int,
  6.      free_words        : int,
  7.      heap_chunks       : int,
  8.      heap_size         : int,
  9.      largest_free      : int,
  10.      live_blocks       : int,
  11.      live_words        : int,
  12.      major_collections : int,
  13.      major_words       : int,
  14.      minor_collections : int,
  15.      minor_words       : int,
  16.      promoted_words    : int
  17.    }
  18. prim_val gc_stat : unit -> gc_status = 1 "gc_stat"
  19. ;
  20.  
  21. type gc_control =
  22.    { major_heap_increment : int,
  23.      minor_heap_size      : int,
  24.      percent_free         : int,
  25.      verb_gc              : bool
  26.    }
  27. prim_val gc_get : unit -> gc_control = 1 "gc_get"
  28. prim_val gc_set : gc_control -> unit = 1 "gc_set"
  29. ;
  30.