1 
 2             2 source_info_ptr           ptr,
 3 
 4             2 add_to_lib_list           entry(char(*),fixed bin(35))
 5                                         variable,
 6             2 get_next_source_seg       entry(ptr)
 7                                         variable,
 8             2 add_to_lib_list_run       entry(char(*),fixed bin(35))
 9                                         entry;
10