1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 #include <stdio.h>
23 #include <ws.h>
24 #include <wsmincap.h>
25 #include <ws_mcb.h>
26 #include <ws_dcls.h>
27 #include <ws_func.h>
28 #include <ws_error.h>
29
30 extern char local_system;
31
32 resume (p_major_number, p_mcb_ptr)
33
34 int p_major_number;
35 mcb *p_mcb_ptr;
36 {
37 int code;
38 int system;
39 int major_cap;
40 struct xcap_struc xcap;
41
42 if (p_mcb_ptr == NULL)
43 return (WSINVMCB);
44
45
46
47 code = c_unpack (&system, &major_cap, p_major_number);
48 if (code != 0)
49 return (code);
50
51 xcap.system = system;
52 xcap.major = major_cap;
53 xcap.minor = RESUME_APPLICATION;
54 xcap.source_system = p_mcb_ptr -> system_id;
55 xcap.source_major = p_mcb_ptr -> major_capability;
56
57 return (call_mowse_int (I$RESET, &xcap , sizeof (xcap) - 1));
58 }
59 ^Z