|
|
1.1 root 1: /*
2: * This file contains one machine independent code generation routine.
3: */
4:
5: #ifdef vax
6: #include "INC$LIB:cc2.h"
7: #else
8: #include "cc2.h"
9: #endif
10:
11: /*
12: * Generate a segment switch.
13: * Reset the values in 'dot' and 'dotseg' to correspond to the new segment.
14: */
15: genseg(sn)
16: {
17: register char *s;
18:
19: if (dotseg >= 0)
20: seg[dotseg].s_dot = dot;
21: if (dotseg != sn) {
22: dotseg = sn;
23: if (dotseg >= 0) {
24: dot = seg[dotseg].s_dot;
25: if (isvariant(VASM)) {
26: bput(ENTER);
27: bput(dotseg);
28: } else
29: outseg(dotseg);
30: }
31: }
32: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.