1 /* BEGIN INCLUDE FILE comp_entries.incl.pl1 */
  2 
  3 /* format: style2,ind2,ll79,dclind4,idind15,comcol41,linecom */
  4 
  5      dcl compose_severity_
  6                         fixed bin (35) ext static;
  7      dcl comp_          entry;
  8      dcl comp_art_      entry (ptr, bit (1));
  9      dcl comp_block_ctls_
 10                         entry (fixed bin);
 11      dcl comp_break_    entry (fixed bin, fixed bin);
 12      dcl comp_break_ctls_
 13                         entry (fixed bin);
 14      dcl comp_ctls_     entry (bit (1) aligned);
 15      dcl comp_eject_page_
 16                         entry;
 17      dcl comp_expr_eval_
 18                         entry (char (*) var, fixed bin (21), ptr, fixed bin,
 19                         fixed bin, bit (1), fixed bin (31), char (*) var,
 20                         bit (9), fixed bin (35));
 21      dcl comp_extr_str_ entry (bit (1), char (*) var, fixed bin (21),
 22                         fixed bin (21), fixed bin (21), ptr)
 23                         returns (char (*) var);
 24      dcl comp_fill_     entry;
 25      dcl comp_font_     entry (bit (1), char (*) var, char (8) aligned);
 26      dcl comp_format_ctls_
 27                         entry (fixed bin);
 28      dcl comp_get_file_$find
 29                         entry (char (*), ptr, char (*), bit (1), char (*) var,
 30                         fixed bin (35));
 31      dcl comp_get_file_$open
 32                         entry (ptr, bit (1), fixed bin (35));
 33      dcl comp_head_page_
 34                         entry (fixed bin (31));
 35      dcl comp_hft_ctls_ entry (fixed bin);
 36      dcl comp_hft_ctls_$title
 37                         entry (ptr, ptr, char (*) var, fixed bin (31));
 38      dcl comp_init_$one entry;
 39      dcl comp_init_$two entry;
 40      dcl comp_init_$three
 41                         entry;
 42      dcl comp_insert_ctls_
 43                         entry (fixed bin);
 44      dcl comp_make_page_
 45                         entry (fixed bin, bit (1));
 46      dcl comp_make_page_$cleanup
 47                         entry;
 48      dcl comp_measure_  entry (char (1020) var, ptr, bit (1), bit (1), bit (6),
 49                         fixed bin (31), ptr, ptr, ptr);
 50      dcl comp_read_$name
 51                         entry (char (*) var, fixed bin (21), fixed bin (21),
 52                         ptr) returns (char (*) var);
 53      dcl comp_read_$number
 54                         entry (char (*) var, (*) fixed bin (31),
 55                         fixed bin (21), fixed bin (21), ptr, fixed bin (35))
 56                         returns (fixed bin (31));
 57      dcl comp_read_$line
 58                         entry (ptr, char (*) var, bit (1));
 59      dcl comp_report_   entry (fixed bin, fixed bin (35), char (*), ptr,
 60                         char (*) var);
 61      dcl comp_report_$ctlstr
 62                         entry options (variable);
 63 /****                (sev, code, info, line, ctl_str, args... */
 64      dcl comp_report_$exact
 65                         entry (char (*), ptr);
 66      dcl comp_space_    entry (fixed bin (31), ptr, bit (1), bit (1), bit (1),
 67                         bit (1));
 68      dcl comp_tbl_ctls_ entry (fixed bin);
 69      dcl comp_title_block_
 70                         entry (ptr);
 71      dcl comp_update_symbol_
 72                         entry (bit (1), bit (1), bit (1), char (32),
 73                         char (*) var);
 74      dcl comp_use_ref_  entry (char (*) var, bit (1), bit (1), ptr);
 75      dcl comp_util_$add_text
 76                         entry (ptr, bit (1), bit (1), bit (1), bit (1), ptr);
 77      dcl comp_util_$display
 78                         entry (char (*) var, fixed bin, bit (1))
 79                         returns (char (*) var);
 80      dcl comp_util_$escape
 81                         entry (char (*) var, ptr);
 82      dcl comp_util_$getblk
 83                         entry (fixed bin, ptr, char (2), ptr, bit (1));
 84      dcl comp_util_$num_display
 85                         entry (ptr, fixed bin) returns (char (256) var);
 86      dcl comp_util_$pageno
 87                         entry (fixed bin, char (*) var);
 88      dcl comp_util_$pictures            /* emit pending pictures */
 89                         entry           /**/
 90                         (ptr);          /* current text block */
 91      dcl comp_util_$pop entry (char (32));
 92      dcl comp_util_$push
 93                         entry (char (32));
 94      dcl comp_util_$relblk
 95                         entry (fixed bin, ptr);
 96      dcl comp_util_$replace_text
 97                         entry (ptr, bit (1), ptr, ptr);
 98      dcl comp_util_$search_tree
 99                         entry (char (32), bit (1));
100      dcl comp_util_$set_bin
101                         entry (fixed bin (31), char (32) var, fixed bin (31),
102                         fixed bin (31), fixed bin (31), (*) fixed bin (31),
103                         fixed bin (31));
104      dcl comp_util_$set_net_page
105                         entry (bit (1));
106      dcl comp_util_$translate
107                         entry (char (*) var) returns (char (*) var);
108      dcl comp_write_block_
109                         entry (fixed bin);
110      dcl comp_write_page_
111                         entry;
112 
113 /*        END INCLUDE FILE comp_entries.incl.pl1  */