1 /* BEGIN INCLUDE FILE - pa_option_value_list.incl.pl1 */
 2 
 3 /* DESCRIPTION:
 4 
 5           The option_value_list structure is constructed by the
 6      pa_get_option_value subroutine.  It is used to return multiple values for
 7      a single option.
 8 */
 9 
10 /* HISTORY:
11 
12 Written by Lindsey Spratt, 06/12/83.
13 Modified:
14 */
15 
16 /* format: style2,ind3 */
17      dcl     1 option_value_list    based (option_value_list_ptr) aligned,
18                2 version            char (8),
19                2 number_of_values   fixed bin (35),
20                2 pad                bit (36),
21                2 value              (ovl_number_of_values refer (option_value_list.number_of_values)),
22                  3 ptr              ptr,
23                  3 vector_idx       fixed bin (35),
24                  3 pad              bit (36);
25 
26      dcl     OPTION_VALUE_LIST_VERSION_1
27                                     init ("optvl 01") char (8) internal static options (constant);
28      dcl     option_value_list_ptr  ptr init (null);
29      dcl     ovl_number_of_values   fixed bin (17) init (0);
30 
31 /* END INCLUDE FILE - pa_option_value_list.incl.pl1 */