1 /* BEGIN vrm_change_bits.incl.pl1 -- R. Harvey */
 2 
 3 dcl  1 change_bits based (change_bits_ptr),
 4        2 number_of_change_bits fixed bin (17),
 5        2 position (cb_number_of_change_bits refer (change_bits.number_of_change_bits)) bit (1) unal;
 6 
 7 dcl  cb_number_of_change_bits fixed bin;
 8 dcl  change_bits_ptr ptr;
 9 
10 /* END vrm_change_bits.incl.pl1 */