Esempio n. 1
0
int
	main(int argc, char **argv)
{
	CRB_Interpreter     *interpreter;

	FILE *fp;

	if (argc != 2) 
	{
		fprintf(stderr, "usage:%s filename", argv[0]);
		exit(1);
	}

	fp = fopen(argv[1], "r");
	if (fp == NULL) 
	{
		fprintf(stderr, "%s not found.\n", argv[1]);
		exit(1);
	}

	interpreter = CRB_create_interpreter();				// 创建解释器
	CRB_compile(interpreter, fp);								// 编译
	CRB_interpret(interpreter);								// 解释
	CRB_dispose_interpreter(interpreter);				// 释放解释器

	MEM_dump_blocks(stdout);								// 检查内存是否释放

	return 0;
}
Esempio n. 2
0
File: main.c Progetto: BluePanM/code
int
main(int argc, char **argv)
{
    CRB_Interpreter     *interpreter;
    FILE *fp;

    if (argc < 2) {
        fprintf(stderr, "usage:%s filename arg1, arg2, ...", argv[0]);
        exit(1);
    }

    fp = fopen(argv[1], "r");
    if (fp == NULL) {
        fprintf(stderr, "%s not found.\n", argv[1]);
        exit(1);
    }

    setlocale(LC_CTYPE, "");
    interpreter = CRB_create_interpreter();
    CRB_compile(interpreter, fp);
    CRB_set_command_line_args(interpreter, argc-2, &argv[2]);
    CRB_interpret(interpreter);
    CRB_dispose_interpreter(interpreter);

    MEM_dump_blocks(stdout);

    return 0;
}
Esempio n. 3
0
int main(int argc, char **argv) {
    ORG_Interpreter     *interpreter;
    FILE *fp;

    if (argc != 2) {
        fprintf(stderr, "usage:%s filename", argv[0]);
        exit(1);
    }

    fp = fopen(argv[1], "r");
    if (fp == NULL) {
        fprintf(stderr, "%s not found.\n", argv[1]);
        exit(1);
    }
    interpreter = ORG_create_interpreter();
    ORG_compile(interpreter, fp);
    ORG_interpret(interpreter);
    ORG_dispose_interpreter(interpreter);

    MEM_dump_blocks(stdout);

    return 0;
}