1 /* Begin include file apl_fuction_info.incl.pl1 */ 2 3 dcl 1 function_info, 4 2 edit_buffer_ptr pointer, 5 2 first_unused_char_in_buffer fixed bin, 6 2 name char(256) varying, 7 2 symbol_ptr ptr unaligned, 8 2 locked_function bit(1), 9 2 suspended_function bit(1), 10 2 pad bit(34), /* to avoid PL/I padded reference bug */ 11 2 saved_stop_vector ptr, 12 2 saved_trace_vector ptr, 13 2 number_of_lines fixed bin, 14 2 args(0:3) char(256) varying, 15 2 line_info(1:500), 16 3 line_number fixed decimal(10,5), 17 3 line_start fixed bin, 18 3 line_length fixed bin; 19 20 /* End include file apl_function_info.incl.pl1 */