github.com/simh.simh
1
0
Fork 0
mirror of https://github.com/simh/simh.git synced 2026-01-25 19:56:25 +00:00
Code Releases Activity

ALL: Massive 'const' cleanup

Browse Source 
These changes facilitate more robust parameter type checking and helps
to identify unexpected coding errors.

Most simulators can now also be compiled with a C++ compiler without
warnings.

Additionally, these changes have also been configured to facilitate easier
backporting of simulator and device simulation modules to run under the
simh v3.9+ SCP framework.
This commit is contained in:
Mark Pizzolato
2016-05-15 15:25:33 -07:00
parent 60a8a2d43d
commit 5531ccb175
444 changed files with 4119 additions and 3798 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
SSEM/ssem_sys.c
View File

@@ -106,7 +106,7 @@ return SCPE_OK;
return = status code
*/
t_stat sim_load (FILE *fi, char *cptr, char *fnam, int flag)
t_stat sim_load (FILE *fi, CONST char *cptr, CONST char *fnam, int flag)
{
size_t len;
@@ -262,9 +262,9 @@ static const char *opcode[] = {
/* Utility function - parses decimal number. */
t_stat parse_sym_d (char *cptr, t_value *val)
t_stat parse_sym_d (const char *cptr, t_value *val)
{
char *start;
const char *start;
int n;
start = cptr;
@@ -275,7 +275,6 @@ while (*cptr >= '0' && *cptr <= '9') {
cptr++;
}
if (*start == '-') n = -n;
if (*start) *start = 'x';
if (*cptr) return SCPE_ARG; /* junk at end? */
@@ -294,15 +293,12 @@ return SCPE_OK;
http://www.computer50.org/mark1/prog98/ssemref.html
*/
t_stat parse_sym_m (char *cptr, t_value *val)
t_stat parse_sym_m (const char *cptr, t_value *val)
{
char *start;
uint32 n,a;
char gbuf[CBUFSIZE];
start = cptr;
cptr = get_glyph(cptr, gbuf, 0);
if (*start) *start = 'x';
for (n = 0; opcode[n] != NULL && strcmp(opcode[n], gbuf) != 0; n++) ;
if (opcode[n] == NULL) return SCPE_ARG; /* invalid mnemonic? */
@@ -331,13 +327,11 @@ return SCPE_OK;
/* Utility function - parses binary backward number. */
t_stat parse_sym_b (char *cptr, t_value *val)
t_stat parse_sym_b (const char *cptr, t_value *val)
{
char *start;
int count;
t_value n;
start = cptr;
count = 0;
n = 0;
while (*cptr == '0' || *cptr == '1') {
@@ -345,7 +339,6 @@ while (*cptr == '0' || *cptr == '1') {
count++;
cptr++;
}
if (*start) *start = 'x';
if (*cptr) return SCPE_ARG; /* junk at end? */
@@ -355,13 +348,11 @@ return SCPE_OK;
/* Utility function - parses binary backward instruccion. */
t_stat parse_sym_i (char *cptr, t_value *val)
t_stat parse_sym_i (const char *cptr, t_value *val)
{
char *start;
int count;
t_value a,n;
start = cptr;
count = 0;
n = 0;
while (*cptr == '0' || *cptr == '1') {
@@ -369,7 +360,6 @@ while (*cptr == '0' || *cptr == '1') {
count++;
cptr++;
}
if (*start) *start = 'x';
if (!(*cptr) && n > OP_UNDOCUMENTED && n <= OP_STOP) {
*val = n << I_V_OP; return SCPE_OK;
@@ -409,7 +399,7 @@ return SCPE_OK;
status = error status
*/
t_stat parse_sym (char *cptr, t_addr addr, UNIT *uptr, t_value *val, int32 sw)
t_stat parse_sym (CONST char *cptr, t_addr addr, UNIT *uptr, t_value *val, int32 sw)
{
if (sw & SWMASK ('H')) return SCPE_ARG; /* hexadecimal? */