mirror of
https://github.com/simh/simh.git
synced 2026-02-07 08:48:04 +00:00
Migrating scp and library global variables to be declared as extern in the appropriate library include file and remove repetitive declarations in referencing modules.
This commit is contained in:
@@ -382,8 +382,6 @@ int32 saved_PC; /* Saved (old) PC) */
|
||||
int32 debug_reg = 0; /* set for debug/trace */
|
||||
int32 debug_flag = 0; /* 1 when trace.log open */
|
||||
FILE *trace;
|
||||
extern int32 sim_int_char;
|
||||
extern uint32 sim_brk_types, sim_brk_dflt, sim_brk_summ;/* breakpoint info */
|
||||
|
||||
t_stat cpu_ex (t_value *vptr, t_addr addr, UNIT *uptr, int32 sw);
|
||||
t_stat cpu_dep (t_value val, t_addr addr, UNIT *uptr, int32 sw);
|
||||
@@ -396,7 +394,6 @@ extern int32 lpt (int32 op, int32 m, int32 n, int32 data);
|
||||
extern int32 dsk1 (int32 op, int32 m, int32 n, int32 data);
|
||||
extern int32 dsk2 (int32 op, int32 m, int32 n, int32 data);
|
||||
extern int32 cpu (int32 op, int32 m, int32 n, int32 data);
|
||||
extern t_stat sim_activate (UNIT *uptr, int32 delay);
|
||||
int32 nulldev (int32 opcode, int32 m, int32 n, int32 data);
|
||||
int32 add_zoned (int32 addr1, int32 len1, int32 addr2, int32 len2);
|
||||
int32 subtract_zoned (int32 addr1, int32 len1, int32 addr2, int32 len2);
|
||||
@@ -505,7 +502,6 @@ DEVICE cpu_dev = {
|
||||
|
||||
t_stat sim_instr (void)
|
||||
{
|
||||
extern int32 sim_interval;
|
||||
register int32 PC, IR;
|
||||
int32 i, j, carry, zero, op1, op2;
|
||||
int32 opcode = 0, qbyte = 0, rbyte = 0;
|
||||
|
||||
@@ -35,8 +35,6 @@
|
||||
extern int32 int_req, dev_busy, dev_done, dev_disable;
|
||||
t_stat pkb_svc (UNIT *uptr);
|
||||
t_stat pkb_reset (DEVICE *dptr);
|
||||
extern t_stat sim_poll_kbd (void);
|
||||
extern t_stat sim_putchar (int32 out);
|
||||
extern int32 IAR[], level;
|
||||
extern int32 debug_reg;
|
||||
|
||||
|
||||
@@ -44,9 +44,9 @@ extern REG cpu_reg[];
|
||||
extern unsigned char M[];
|
||||
extern int32 saved_PC, IAR[];
|
||||
extern unsigned char ebcdic_to_ascii[];
|
||||
char *parse_addr(char *cptr, char *gbuf, int32 *addr, int32 *addrtype);
|
||||
char *parse_addr(char *cptr, char *gbuf, t_addr *addr, int32 *addrtype);
|
||||
|
||||
int32 printf_sym (FILE *of, char *strg, int32 addr, uint32 *val,
|
||||
int32 printf_sym (FILE *of, char *strg, t_addr addr, uint32 *val,
|
||||
UNIT *uptr, int32 sw);
|
||||
|
||||
/* SCP data structures
|
||||
@@ -267,7 +267,7 @@ int32 fprint_sym (FILE *of, t_addr addr, uint32 *val,
|
||||
return (r);
|
||||
}
|
||||
|
||||
int32 printf_sym (FILE *of, char *strg, int32 addr, uint32 *val,
|
||||
int32 printf_sym (FILE *of, char *strg, t_addr addr, uint32 *val,
|
||||
UNIT *uptr, int32 sw)
|
||||
{
|
||||
int32 c1, c2, group, len1, len2, inst, aaddr, baddr;
|
||||
@@ -923,7 +923,7 @@ switch (opcode[j].form) { /* Get operands based on
|
||||
return (-(oplen-1));
|
||||
}
|
||||
|
||||
char *parse_addr(char *cptr, char *gbuf, int32 *addr, int32 *addrtype)
|
||||
char *parse_addr(char *cptr, char *gbuf, t_addr *addr, int32 *addrtype)
|
||||
{
|
||||
int32 nybble = 0;
|
||||
char temp[32];
|
||||
|
||||
Reference in New Issue
Block a user