]>
Commit | Line | Data |
---|---|---|
de56407f | 1 | /* |
2 | * $Source$ | |
3 | * $Header$ | |
4 | */ | |
5 | ||
6 | #ifndef lint | |
7 | static char *rcsid_inst_001_c = "$Header$"; | |
8 | #endif lint | |
9 | ||
10 | #include <stdio.h> | |
11 | #include "gdb.h" | |
12 | #include "kludge.h" | |
13 | #include "sms_update_int.h" | |
14 | ||
15 | STRING instructions = { 0, 0 }; | |
16 | extern CONNECTION conn; | |
17 | extern int have_instructions; | |
18 | extern int code; | |
19 | ||
20 | /* | |
21 | * instruction sequence transmission: | |
22 | * syntax: | |
23 | * >>> (STRING) "inst_001" | |
24 | * <<< (int)0 | |
25 | * >>> (STRING) instructions | |
26 | * <<< (int)0 | |
27 | */ | |
28 | ||
29 | inst_001(str) | |
30 | char *str; | |
31 | { | |
32 | if (send_ok()) | |
33 | lose("sending okay for inst_001"); | |
34 | code = receive_object(conn, (char *)&instructions, STRING_T); | |
35 | if (code) { | |
36 | report_error("reporting failure to receive instructions"); | |
37 | return; | |
38 | } | |
39 | have_instructions = 1; | |
40 | if (send_ok()) | |
41 | lose("sending okay after instructions"); | |
42 | dprintf(("got instructions: %s\n", STRING_DATA(instructions))); | |
43 | } |