Pristine Ack-5.5
[Ack-5.5.git] / util / ceg / ce_back / obj_back / label.c
1 #include <out.h>
2 #include "header.h"
3 #include "back.h"
4
5 int  Label, Label_waiting; 
6
7 save_label( lab)
8 char *lab;
9
10 /* It is now not possible to tell where the label belongs to, so store
11  * the string and remember the returned index to store the missing
12  * information later on (see dump_label()). Two labels at one address
13  * is not allowed.
14  */
15 {
16         Label = find_sym( lab, SYMBOL_DEFINITION);
17         Label_waiting = 1;
18 }
19
20
21 dump_label()
22 {
23         if ( Label_waiting) {
24                 align_word();
25                 symbol_table[ Label].on_valu = cur_value();
26                 symbol_table[ Label].on_type |= ( S_MIN + conv_seg( cur_seg));
27                 Label_waiting = 0;
28         }
29 }
30