1 /* ***********************************************************
 2    *                                                         *
 3    * Copyright, (C) Honeywell Information Systems Inc., 1983 *
 4    *                                                         *
 5    *********************************************************** */
 6 /* BEGIN INCLUDE FILE - vu_entry_dcls.incl.pl1 */
 7 
 8 /* Written 03/01/82 by Lindsey Spratt.
 9 Modified:
10 09/23/82 by Lindsey Spratt:  Added the append_simple_typed_vector,
11             free_typed_vector_array, and free_typed_vector entries.
12 07/24/83 by Lindsey Spratt:  Added $cv_pva_to_string and $cv_string_to_pva.
13 */
14 
15 /* format: style2,ind3 */
16      dcl     vector_util_$display   entry (ptr, ptr, fixed bin (35));
17      dcl     vector_util_$sort_print
18                                     entry (ptr, ptr, fixed bin (35));
19 
20      dcl     vector_util_$init_print_vector_array
21                                     entry options (variable);
22      dcl     vector_util_$init_typed_vector_array
23                                     entry options (variable);
24 
25      dcl     vector_util_$append_dimension_print
26                                     entry (ptr, bit (1) aligned, char (*), ptr, ptr, fixed bin, fixed bin (35));
27 
28      dcl     vector_util_$append_simple_print_vector
29                                     entry options (variable);
30      dcl     vector_util_$append_general_print_vector
31                                     entry options (variable);
32 
33      dcl     vector_util_$append_simple_typed_vector
34                                     entry options (variable);
35 
36 /* call vector_util_$free_typed_vector_array (work_area_ptr, typed_vector_array_ptr, code) */
37      dcl     vector_util_$free_typed_vector_array
38                                     entry (ptr, ptr, fixed bin (35));
39 
40 /* call vector_util_$free_typed_vector (work_area_ptr,typed_vector_array_ptr,typed_vector_ptr,code) */
41      dcl     vector_util_$free_typed_vector
42                                     entry (ptr, ptr, ptr, fixed bin (35));
43 
44      dcl     vector_util_$cv_typed_to_print
45                                     entry (ptr, ptr, ptr, fixed bin (35));
46      dcl     vector_util_$cv_any_to_print_dimension
47                                     entry (ptr, ptr, ptr, fixed bin (35), char (*) varying, fixed bin (35));
48 
49      dcl     vector_util_$cv_pva_to_string
50                                     entry (ptr, ptr, fixed bin (35), fixed bin (35));
51      dcl     vector_util_$cv_string_to_pva
52                                     entry (ptr, fixed bin (35), ptr, ptr, fixed bin (35));
53 
54      dcl     vector_util_$err_no_operation
55                                     entry (ptr, fixed bin (17), fixed bin (17), ptr, ptr, fixed bin (35));
56 
57 /*  END INCLUDE FILE - vu_entry_dcls.incl.pl1 */
58