1 " ***********************************************************
2 " * *
3 " * Copyright, C Honeywell Bull Inc., 1989 *
4 " * *
5 " * Copyright, C Honeywell Information Systems Inc., 1983 *
6 " * *
7 " ***********************************************************
8
9 " HISTORY COMMENTS:
10 " 1) change88-12-14Parisek, approve89-01-11MCR8044,
11 " audit89-01-16Farley, install89-01-19MR12.3-1006:
12 " Added the get_aliases entry formerly located in mail_table_priv_
13 " so non-privileged users can look at mail table aliases as well as
14 " primary names via dsmla. Added get_name_by_index used by dsmla for
15 " matching starnames.
16 " END HISTORY COMMENTS
17
18
19 " mail_table_ gate, entrypoints for normal users
20 "
21 name mail_table_
22
23 include gate_macros
24 include stack_header
25 include stack_frame
26
27 gate_info
28
29 gate get,mail_table_mgr_,get,4
30 gate set,mail_table_mgr_,put,3
31 gate get_aliases,mail_table_mgr_,get_aliases,5
32 gate get_name_by_index,mail_table_mgr_,get_name_by_index,4
33
34 end