1 /* BEGIN INCLUDE FILE ... compiler_source_info.incl.pl1 */ 2 /* coded in 1973 by B. Wolman */ 3 /* modified 12/75 by M. Weaver to include more source info */ 4 /* modified 12/76 by M. Weaver to include still more source info (version 2) */ 5 6 dcl 1 compiler_source_info aligned based, 7 2 version fixed bin, 8 2 given_ename char (32) var, 9 2 dirname char (168) var, 10 2 segname char (32) var, 11 2 date_time_modified fixed bin (71), 12 2 unique_id bit (36), 13 2 input_lng fixed bin (21), 14 2 input_pointer ptr; 15 16 dcl compiler_source_info_version_2 fixed bin static init (2) options (constant); 17 18 /* END INCLUDE FILE ... compiler_source_info.incl.pl1 */