← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/simh/intrepid

« back to all changes in this revision

Viewing changes to H316/h316_sys.c

  • Committer: Bazaar Package Importer
  • Author(s): Vince Mulhollon
  • Date: 2005-05-30 19:25:10 UTC
  • mfrom: (1.1.3 upstream) (2.1.1 sarge)
  • Revision ID: james.westby@ubuntu.com-20050530192510-npcvtltga170kziw
Tags: 3.4.0-1
New upstream

Show diffs side-by-side

added added

removed removed

Lines of Context:
H316/h316_sys.c
23
23
   be used in advertising or otherwise to promote the sale, use or other dealings
24
24
   in this Software without prior written authorization from Robert M Supnik.
25
25
 
 
26
   01-Dec-04    RMS     Fixed fprint_opr calling sequence
26
27
   24-Oct-03    RMS     Added DMA/DMC support
27
28
   17-Sep-01    RMS     Removed multiconsole support
28
29
*/
196
197
        status  =       space needed
197
198
*/
198
199
 
199
 
int32 fprint_opr (FILE *of, int32 inst, int32 class, int32 sp)
 
200
void fprint_opr (FILE *of, int32 inst, int32 class)
200
201
{
201
 
int32 i, j;
 
202
int32 i, j, sp;
202
203
 
203
 
for (i = 0; opc_val[i] >= 0; i++) {                     /* loop thru ops */
 
204
for (i = sp = 0; opc_val[i] >= 0; i++) {                /* loop thru ops */
204
205
        j = (opc_val[i] >> I_V_FL) & I_M_FL;            /* get class */
205
206
        if ((j == class) && (opc_val[i] & inst)) {      /* same class? */
206
207
            inst = inst & ~opc_val[i];                  /* mask bit set? */
207
208
            fprintf (of, (sp? " %s": "%s"), opcode[i]);
208
209
            sp = 1;  }  }
209
 
return sp;
 
210
return;
210
211
}
211
212
 
212
213
/* Symbolic decode
268
269
            fprintf (of, "%s %o", opcode[i], disp);
269
270
            break;
270
271
        case I_V_SK0: case I_V_SK1:                     /* skips */
271
 
            fprint_opr (of, inst & 0777, j, 0); /* print skips */       
272
 
            break;  }                           /* end case */
 
272
            fprint_opr (of, inst & 0777, j);            /* print skips */       
 
273
            break;  }                                   /* end case */
273
274
        return SCPE_OK;  }                              /* end if */
274
275
        }                                               /* end for */
275
276
return SCPE_ARG;