j.c 758 Bytes
/****************************************************************
  WHAT: RSP SCALAR UNIT Jxx INSTRUCTION TEST GENERATOR
  SCCS: @(#)j.c	1.1 03 Aug 1994
  FILE:	j.c
   WHO:	Project Reality - Evan Y. Wang
   (C):	1994 Silicon Graphics, Inc.
 ****************************************************************/
#include <stdio.h>
#include "software.h"
#include "gen.h"
#include "suregre.h"

#define	MAX_TCS	MAX_J_TCS

#define GenCase()	fprintf(outp,JTempl,CurTcNo,ip->name,rT)

/*			  ChkJ(  n,Op,   rT); */
PRIVATE	char *JTempl = "\tChkJ(%2d,%s,r%-2d)\n";

int JGen(outp, ip)
    FILE *outp;
    I_TABLE *ip;
{
    int r = rT;

    do {
	FILE_SPLIT {
	    GenCase();
	    UpdRegID();
	}
    } while (CurTcNo++, r != rT);
    return CurTcNo = 0;

}   /* JGen */