COMPILATION LISTING OF fort_int_builtins_ (>spec>online>fort_recompile>fort_int_builtins_.fortran) Compiled by: Multics New Fortran Compiler, Release 11.0 Compiled on: 12/27/84 0841.5 mst Thu Options: ansi77 binary_floating_point round full_optimize auto_zero map Function iabs_ 1 c ****************************************** 2 c * * 3 c * Copyright, (C) Honeywell Limited, 1984 * 4 c * * 5 c ****************************************** 6 7 %global ansi77 8 integer function iabs_(arg) 9 integer arg 10 iabs_ = iabs(arg) 11 end Function iabs_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg parameter position 1 integer ref 8 9 10 iabs builtin ref 10 iabs_ entry point 00000004 constant integer on line 8 iabs_ 00000100 automatic integer ref 8 10 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 8 000000 10 000020 11 000025 Function idim_ 12 integer function idim_(arg1, arg2) 13 integer arg1, arg2 14 idim_ = idim(arg1, arg2) 15 end Function idim_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 12 13 14 arg2 parameter position 2 integer ref 12 13 14 idim builtin ref 14 idim_ 00000102 automatic integer ref 12 14 idim_ entry point 00000033 constant integer on line 12 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 12 000027 14 000047 15 000057 Function index_ 16 integer function index_(arg1, arg2) 17 character*(*) arg1, arg2 18 index_ = index(arg1, arg2) 19 end Function index_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 character(*) ref 16 17 18 arg2 parameter position 2 character(*) ref 16 17 18 index builtin ref 18 index_ 00000104 automatic integer ref 16 18 index_ entry point 00000065 constant integer on line 16 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 16 000061 18 000113 19 000123 Function isign_ 20 integer function isign_(arg1, arg2) 21 integer arg1, arg2 22 isign_ = isign(arg1, arg2) 23 end Function isign_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 20 21 22 arg2 parameter position 2 integer ref 20 21 22 isign builtin ref 22 isign_ 00000110 automatic integer ref 20 22 isign_ entry point 00000131 constant integer on line 20 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 20 000125 22 000145 23 000151 Function len_ 24 integer function len_(arg) 25 character*(*) arg 26 len_ = len(arg) 27 end Function len_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg parameter position 1 character(*) ref 24 25 26 len builtin ref 26 len_ entry point 00000157 constant integer on line 24 len_ 00000112 automatic integer ref 24 26 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 24 000153 26 000201 27 000203 Function mod_ 28 integer function mod_(arg1, arg2) 29 integer arg1, arg2 30 mod_ = mod(arg1, arg2) 31 end Function mod_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 28 29 30 arg2 parameter position 2 integer ref 28 29 30 mod builtin ref 30 mod_ 00000114 automatic integer ref 28 30 mod_ entry point 00000211 constant integer on line 28 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 28 000205 30 000225 31 000231 Function ilr_ 32 integer function ilr_(arg1, arg2) 33 integer arg1, arg2 34 ilr_ = ilr(arg1, arg2) 35 end Function ilr_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 32 33 34 arg2 parameter position 2 integer ref 32 33 34 ilr builtin ref 34 ilr_ 00000116 automatic integer ref 32 34 ilr_ entry point 00000237 constant integer on line 32 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 32 000233 34 000253 35 000257 Function ils_ 36 integer function ils_(arg1, arg2) 37 integer arg1, arg2 38 ils_ = ils(arg1, arg2) 39 end Function ils_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 36 37 38 arg2 parameter position 2 integer ref 36 37 38 ils builtin ref 38 ils_ 00000120 automatic integer ref 36 38 ils_ entry point 00000265 constant integer on line 36 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 36 000261 38 000301 39 000305 Function irl_ 40 integer function irl_(arg1, arg2) 41 integer arg1, arg2 42 irl_ = irl(arg1, arg2) 43 end Function irl_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 40 41 42 arg2 parameter position 2 integer ref 40 41 42 irl builtin ref 42 irl_ 00000122 automatic integer ref 40 42 irl_ entry point 00000313 constant integer on line 40 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 40 000307 42 000327 43 000333 Function irs_ 44 integer function irs_(arg1, arg2) 45 integer arg1, arg2 46 irs_ = irs(arg1, arg2) 47 end Function irs_ NAMES USED IN THIS PROGRAM UNIT NAME TYPE OF NAME LOC STORAGE ATTRIBUTES AND REFERENCES arg1 parameter position 1 integer ref 44 45 46 arg2 parameter position 2 integer ref 44 45 46 irs builtin ref 46 irs_ 00000124 automatic integer ref 44 46 irs_ entry point 00000341 constant integer on line 44 LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC LINE LOC 44 000335 46 000355 47 000361 OBJECT SEGMENT SUMMARY STORAGE REQUIREMENTS FOR THIS PROGRAM Object Text Link Symbol Defs Static Start 0 0 366 502 376 376 Length 712 366 10 173 104 0 Stack frame is 176 (decimal) words. ENTRY POINT LOC ATTRIBUTES iabs_ 000004 on line 8 idim_ 000033 on line 12 ilr_ 000237 on line 32 ils_ 000265 on line 36 index_ 000065 on line 16 irl_ 000313 on line 40 irs_ 000341 on line 44 isign_ 000131 on line 20 len_ 000157 on line 24 mod_ 000211 on line 28 NO EXTERNAL REFERENCES NO COMMON BLOCKS SOURCE FILES USED IN THIS COMPILATION LINE NUMBER DATE MODIFIED PATHNAME 0 12/27/84 0838.6 >spec>online>fort_recompile>fort_int_builtins_.fortran ----------------------------------------------------------- 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