Compiler indicated cleanups to Fix #105
This commit is contained in:
parent
c9e8121c16
commit
8d09ebec8b
2 changed files with 3 additions and 4 deletions
|
@ -51,7 +51,6 @@ extern REG cpu_reg[];
|
||||||
extern uint8 M[];
|
extern uint8 M[];
|
||||||
extern char ascii_to_bcd_old[128], ascii_to_bcd[128];
|
extern char ascii_to_bcd_old[128], ascii_to_bcd[128];
|
||||||
extern char bcd_to_ascii_old[64], bcd_to_ascii_a[64], bcd_to_ascii_h[64];
|
extern char bcd_to_ascii_old[64], bcd_to_ascii_a[64], bcd_to_ascii_h[64];
|
||||||
extern char *get_glyph (char *cptr, char *gbuf, char term);
|
|
||||||
extern int32 store_addr_h (int32 addr);
|
extern int32 store_addr_h (int32 addr);
|
||||||
extern int32 store_addr_t (int32 addr);
|
extern int32 store_addr_t (int32 addr);
|
||||||
extern int32 store_addr_u (int32 addr);
|
extern int32 store_addr_u (int32 addr);
|
||||||
|
|
6
scp.c
6
scp.c
|
@ -8195,7 +8195,7 @@ static TOPIC *buildHelp (TOPIC *topic, struct sim_device *dptr,
|
||||||
htext++;
|
htext++;
|
||||||
continue;
|
continue;
|
||||||
}
|
}
|
||||||
FAIL (SCPE_ARG, Unknown line type, NULL); /* Unknown line */
|
FAIL (SCPE_ARG, Unknown line type, htext); /* Unknown line */
|
||||||
} /* htext not at end */
|
} /* htext not at end */
|
||||||
memset (vstrings, 0, VSMAX * sizeof (char *));
|
memset (vstrings, 0, VSMAX * sizeof (char *));
|
||||||
vsnum = 0;
|
vsnum = 0;
|
||||||
|
@ -8402,11 +8402,11 @@ t_stat scp_vhelp (FILE *st, struct sim_device *dptr,
|
||||||
if ((failed = setjmp (help_env)) != 0) {
|
if ((failed = setjmp (help_env)) != 0) {
|
||||||
fprintf (stderr, "\nHelp was unable to process the help for this device.\n"
|
fprintf (stderr, "\nHelp was unable to process the help for this device.\n"
|
||||||
"Error in block %u line %u: %s\n"
|
"Error in block %u line %u: %s\n"
|
||||||
"%s%0.*s%s"
|
"%s%*.*s%s"
|
||||||
" Please contact the device maintainer.\n",
|
" Please contact the device maintainer.\n",
|
||||||
(int)help_where.block, (int)help_where.line, help_where.error,
|
(int)help_where.block, (int)help_where.line, help_where.error,
|
||||||
help_where.prox ? "Near '" : "",
|
help_where.prox ? "Near '" : "",
|
||||||
help_where.prox ? 15 : 0,
|
help_where.prox ? 15 : 0, help_where.prox ? 15 : 0,
|
||||||
help_where.prox ? help_where.prox : "",
|
help_where.prox ? help_where.prox : "",
|
||||||
help_where.prox ? "'" : "");
|
help_where.prox ? "'" : "");
|
||||||
cleanHelp (&top);
|
cleanHelp (&top);
|
||||||
|
|
Loading…
Add table
Reference in a new issue