1
0
mirror of https://github.com/simh/simh.git synced 2026-02-10 10:11:20 +00:00

Completing merge of v3.9-0-rc1 compile cleanups

This commit is contained in:
Mark Pizzolato
2012-03-20 18:55:45 -07:00
parent 2b43b358a8
commit cf280ad8f7
13 changed files with 37 additions and 370 deletions

13
scp.c
View File

@@ -438,7 +438,7 @@ FILE *sim_deb = NULL; /* debug file */
FILEREF *sim_deb_ref = NULL; /* debug file file reference */
static FILE *sim_gotofile; /* the currently open do file */
static int32 sim_do_echo = 0; /* the echo status of the currently open do file */
static int32 sim_do_depth = 0;
int32 sim_do_depth = 0;
static int32 sim_on_check[MAX_DO_NEST_LVL+1];
static char *sim_on_actions[MAX_DO_NEST_LVL+1][SCPE_MAX_ERR+1];
@@ -4599,8 +4599,7 @@ return pptr;
SCHTAB *get_search (char *cptr, int32 radix, SCHTAB *schptr)
{
int32 c;
size_t logop, cmpop;
int32 c, logop, cmpop;
t_value logval, cmpval;
char *sptr, *tptr;
const char logstr[] = "|&^", cmpstr[] = "=!><";
@@ -4610,14 +4609,14 @@ if (*cptr == 0) /* check for clause */
return NULL;
for (logop = cmpop = -1; c = *cptr++; ) { /* loop thru clauses */
if (sptr = strchr (logstr, c)) { /* check for mask */
logop = sptr - logstr;
logop = (int32)(sptr - logstr);
logval = strtotv (cptr, &tptr, radix);
if (cptr == tptr)
return NULL;
cptr = tptr;
}
else if (sptr = strchr (cmpstr, c)) { /* check for boolop */
cmpop = sptr - cmpstr;
cmpop = (int32)(sptr - cmpstr);
if (*cptr == '=') {
cmpop = cmpop + strlen (cmpstr);
cptr++;
@@ -4630,11 +4629,11 @@ for (logop = cmpop = -1; c = *cptr++; ) { /* loop thru clauses */
else return NULL;
} /* end for */
if (logop >= 0) {
schptr->logic = (int32)logop;
schptr->logic = logop;
schptr->mask = logval;
}
if (cmpop >= 0) {
schptr->boolop = (int32)cmpop;
schptr->boolop = cmpop;
schptr->comp = cmpval;
}
return schptr;