Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/src/runtime/config/gen-bc-instr-def.c
ViewVC logotype

View of /sml/trunk/src/runtime/config/gen-bc-instr-def.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 651 - (download) (as text) (annotate)
Thu Jun 1 18:34:03 2000 UTC (20 years, 4 months ago) by monnier
File size: 480 byte(s)
bring revisions from the vendor branch to the trunk
/* gen-bc-instr-def.c
 *
 * COPYRIGHT (c) 1993 by AT&T Bell Laboratories.
 *
 * A program to generate #defines for the bytecode instruction opcodes.
 */

#include <stdio.h>
#include "gen.h"
#include "bc.h"
#include "print-bc.h"

main ()
{
    int		i;
    FILE	*f;

    f = OpenFile ("bc-instr-def.h", "_BC_INSTR_DEF_");

    for (i = 0;  i < NUM_BC_INSTRS;  i++)
	fprintf(f, "#define %-23s %d\n", instrTbl[i].instrName, i);

    CloseFile (f, "_BC_INSTR_DEF_");

    exit (0);
}


root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0