1 " ***********************************************************
 2 " *                                                         *
 3 " * Copyright, (C) Honeywell Bull Inc., 1987                *
 4 " *                                                         *
 5 " * Copyright, (C) Honeywell Information Systems Inc., 1982 *
 6 " *                                                         *
 7 " * Copyright (c) 1972 by Massachusetts Institute of        *
 8 " * Technology and Honeywell Information Systems, Inc.      *
 9 " *                                                         *
10 " ***********************************************************
11 
12 "
13 "         mhcs_ - Metering hardcore suprevisor gate.
14 
15 "                   Separate gate because it allows AIM write-down
16 
17           include   gate_macros
18 
19           hardcore_gate_info  mhcs_
20 
21           hgate     get_seg_usage,status_,get_seg_usage,4,bad_dir_trap
22           hgate     get_seg_usage_ptr,status_,get_seg_usage_ptr,3,bad_dir_trap
23 
24           bad_dir_handler
25 
26           end