|
|
1.1 root 1:
2: x_buf = cluster is init,
3: get, send_data, send_array, flush,
4: receive, receive_data, events,
5: get_lp0, get_lp1, get_lp2, get_lp3,
6: get_sp0, get_sp1, get_sp2, get_sp3, get_sp4, get_sp5,
7: get_bp10, get_bp11
8:
9: rep = null
10:
11: init = proc (addr: _wordvec) signals (error(string))
12: end init
13:
14: get = proc () returns (oreq, ereq)
15: end get
16:
17: send_data = proc (b: _bytevec, start, z: int)
18: end send_data
19:
20: send_array = proc (a: array[char], start, z: int)
21: end send_array
22:
23: flush = proc ()
24: end flush
25:
26: receive = proc () signals (error(string))
27: end receive
28:
29: receive_data = proc (b: _bytevec)
30: end receive_data
31:
32: events = proc (need: bool)
33: end events
34:
35: get_lp0 = proc () returns (int)
36: end get_lp0
37:
38: get_lp1 = proc () returns (int)
39: end get_lp1
40:
41: get_lp2 = proc () returns (int)
42: end get_lp2
43:
44: get_lp3 = proc () returns (int)
45: end get_lp3
46:
47: get_sp0 = proc () returns (int)
48: end get_sp0
49:
50: get_sp1 = proc () returns (int)
51: end get_sp1
52:
53: get_sp2 = proc () returns (int)
54: end get_sp2
55:
56: get_sp3 = proc () returns (int)
57: end get_sp3
58:
59: get_sp4 = proc () returns (int)
60: end get_sp4
61:
62: get_sp5 = proc () returns (int)
63: end get_sp5
64:
65: get_bp10 = proc () returns (int)
66: end get_bp10
67:
68: get_bp11 = proc () returns (int)
69: end get_bp11
70:
71: end x_buf
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.