/*  BEGIN INCLUDE FILE lisp_name_codes.incl.pl1 */

/*  These are codes for the names of functions which are stored into ab|-1,x7 before
    calling lisp_error_ for a bad_argument or bad_arg_correctable error. They
    are used so that the name of the function which is rejecting its argument
    can be printed.  Please note that all these codes are negative. */

dcl (
	fn_do			init (-10),
	fn_arg			init (-11),
	fn_setarg			init (-12),
	fn_status			init (-13),
	fn_sstatus		init (-14),
	fn_errprint		init (-15),
	fn_errframe		init (-16),
	fn_evalframe		init (-17),
	fn_defaultf		init (-18),
	fn_tyo			init (-22),
	fn_ascii			init (-23),
	fn_rplaca			init (-24),
	fn_definedp		init (-25),
	fn_setq			init (-26),
	fn_set			init (-27),
	fn_delete			init (-28),
	fn_delq			init (-29),
	fn_stringlength		init (-30),
	fn_catenate		init (-31),
	fn_array			init (-32),
	fn_substr			init (-33),
	fn_index			init (-34),
	fn_get_pname		init (-35),
	fn_make_atom		init (-36),
	fn_ItoC			init (-37),
	fn_CtoI			init (-38),
	fn_defsubr		init (-39),
	fn_star_array		init (-40),
	fn_args			init (-41),
	fn_sysp			init (-42),
	fn_get			init (-43),
	fn_getl			init (-44),
	fn_putprop		init (-45),
	fn_remprop		init (-46),
	fn_save			init (-47),
	fn_add1			init (-48),
	fn_sub1			init (-49),
	fn_greaterp		init (-50),
	fn_lessp			init (-51),
	fn_minus			init (-52),
	fn_plus			init (-53),
	fn_times			init (-54),
	fn_difference		init (-55),
	fn_quotient		init (-56),
	fn_abs			init (-57),
	fn_expt			init (-58),
	fn_boole			init (-59),
	fn_rot			init (-60),
	fn_lsh			init (-61),
	fn_signp			init (-62),
	fn_fix			init (-63),
	fn_float			init (-64),
	fn_remainder		init (-65),
	fn_max			init (-66),
	fn_min			init (-67),
	fn_add1_fix		init (-68),
	fn_add1_flo		init (-69),
	fn_sub1_fix		init (-70),
	fn_sub1_flo		init (-71),
	fn_plus_fix		init (-72),
	fn_plus_flo		init (-73),
	fn_times_fix		init (-74),
	fn_times_flo		init (-75),
	fn_diff_fix		init (-76),
	fn_diff_flo		init (-77),
	fn_quot_fix		init (-78),
	fn_quot_flo		init (-79),
	fn_eval			init (-80),
	fn_apply			init (-81),
	fn_prog			init (-82),
	fn_errset			init (-83),
	fn_catch			init (-84),
	fn_throw			init (-85),
	fn_store			init (-86),
	fn_defun			init (-87),
	fn_baktrace		init (-88),
	fn_bltarray		init (-89),
	fn_star_rearray		init (-90),
	fn_gensym			init (-91),
	fn_makunbound		init (-92),
	fn_boundp			init (-93),
	fn_star_status		init (-94),
	fn_star_sstatus		init (-95),
	fn_freturn		init (-96),
	fn_cos			init (-97),
	fn_sin			init (-98),
	fn_exp			init (-99),
	fn_log			init (-100),
	fn_sqrt			init (-101),
	fn_isqrt			init (-102),
	fn_atan			init (-103),
	fn_sleep			init (-104),
	fn_oddp			init (-105),
	fn_tyipeek		init (-106),
	fn_alarmclock		init (-107),
	fn_plusp			init (-108),
	fn_minusp			init (-109),
	fn_ls			init (-110),
	fn_eql			init (-111),
	fn_gt			init (-112),
	fn_alphalessp		init (-113),
	fn_samepnamep		init (-114),
	fn_getchar		init (-115),
	fn_opena			init (-116),
	fn_sxhash			init (-117),
	fn_gcd			init (-118),
	fn_allfiles		init (-119),
	fn_chrct			init (-120),
	fn_close			init (-121),
	fn_deletef		init (-122),
	fn_eoffn			init (-123),
	fn_filepos		init (-124),
	fn_inpush			init (-125),
	fn_linel			init (-126),
	fn_mergef			init (-127),
	fn_namelist		init (-128),
	fn_names			init (-129),
	fn_namestring		init (-130),
	fn_openi			init (-131),
	fn_openo			init (-132),
	fn_prin1			init (-133),
	fn_princ			init (-134),
	fn_print			init (-135),
	fn_read			init (-136),
	fn_readch			init (-137),
	fn_readstring		init (-138),
	fn_rename			init (-139),
	fn_shortnamestring		init (-140),
	fn_tyi			init (-141),
	fn_setsyntax		init (-142),
	fn_cursorpos		init (-143),
	fn_force_output		init (-144),
	fn_clear_input		init (-145),
	fn_random			init (-146),
	fn_haulong		init (-147),
	fn_haipart		init (-148),
	fn_cline			init (-149),
	fn_fillarray		init (-150),
	fn_listarray		init (-151),
	fn_sort			init (-152),
	fn_sortcar		init (-153),
	fn_zerop			init (-154),
	fn_listify		init (-155),
	fn_charpos		init (-156),
	fn_pagel			init (-157),
	fn_linenum		init (-158),
	fn_pagenum		init (-159),
	fn_endpagefn		init (-160),
	fn_arraydims		init (-161),
	fn_loadarrays		init (-162),
	fn_dumparrays		init (-163),
	fn_expt_fix		init (-164),
	fn_expt_flo		init (-165),
	fn_nointerrupt		init (-166),
	fn_open			init (-167),
	fn_in			init (-168),
	fn_out			init (-169),
	fn_truename		init (-170),
	fn_ifix			init (-171),
	fn_fsc			init (-172),
	fn_progv			init (-173),
	fn_mapatoms		init (-174),
	fn_unwind_protect		init (-175),
	fn_eval_when		init (-176),
	fn_read_from_string		init (-177),
	fn_displace		init (-178),
	fn_nth			init (-179),
	fn_nthcdr			init (-180),
	fn_includef		init (-181)
    ) fixed bin static;

/*  END INCLUDE FILE lisp_name_codes.incl.pl1 */


*/
                                          -----------------------------------------------------------


Historical Background

This edition of the Multics software materials and documentation is provided and donated
to Massachusetts Institute of Technology by Group Bull including Bull HN Information Systems Inc. 
as a contribution to computer science knowledge.  
This donation is made also to give evidence of the common contributions of Massachusetts Institute of Technology,
Bell Laboratories, General Electric, Honeywell Information Systems Inc., Honeywell Bull Inc., Groupe Bull
and Bull HN Information Systems Inc. to the development of this operating system. 
Multics development was initiated by Massachusetts Institute of Technology Project MAC (1963-1970),
renamed the MIT Laboratory for Computer Science and Artificial Intelligence in the mid 1970s, under the leadership
of Professor Fernando Jose Corbato. Users consider that Multics provided the best software architecture for 
managing computer hardware properly and for executing programs. Many subsequent operating systems 
incorporated Multics principles.
Multics was distributed in 1975 to 2000 by Group Bull in Europe , and in the U.S. by Bull HN Information Systems Inc., 
as successor in interest by change in name only to Honeywell Bull Inc. and Honeywell Information Systems Inc. .

                                          -----------------------------------------------------------

Permission to use, copy, modify, and distribute these programs and their documentation for any purpose and without
fee is hereby granted,provided that the below copyright notice and historical background appear in all copies
and that both the copyright notice and historical background and this permission notice appear in supporting
documentation, and that the names of MIT, HIS, Bull or Bull HN not be used in advertising or publicity pertaining
to distribution of the programs without specific prior written permission.
    Copyright 1972 by Massachusetts Institute of Technology and Honeywell Information Systems Inc.
    Copyright 2006 by Bull HN Information Systems Inc.
    Copyright 2006 by Bull SAS
    All Rights Reserved

*/