crepl

An intuitive calculator REPL.
git clone git://git.knutsen.co/crepl
Log | Files | Refs | README | LICENSE

prelude.c (661B)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#include "prelude.h"

char *PRELUDE_STATEMENTS[] = {
	"tau = 2pi",
	"phi = 1.61803398875",
	"crepl = \"Calculator REPL, v" VERSION ".\""
};

void execute_prelude(Context *ctx)
{
	for (usize i = 0; i < len(PRELUDE_STATEMENTS); ++i) {
		const char *stmt_str = PRELUDE_STATEMENTS[i];

		ParseNode *stmt = parse(stmt_str);
		if (stmt == NULL || ERROR_TYPE != NO_ERROR)
			goto fatality;

		DataValue *result = execute(ctx, stmt);
		if (result == NULL || ERROR_TYPE != NO_ERROR)
			goto fatality;

		free(stmt);
	}
	return;

fatality:
	handle_error();
	fprintf(stderr, "\nFATAL: Prelude failed to run without error.\n");
	fprintf(stderr, "ABORTING!\n");
	exit(1);
}