diff options
| author | Bad Diode <bd@badd10de.dev> | 2021-10-09 20:23:52 +0200 |
|---|---|---|
| committer | Bad Diode <bd@badd10de.dev> | 2021-10-09 20:23:52 +0200 |
| commit | ab6b56dfe916c17f34e684e69483895402783ae5 (patch) | |
| tree | 37be6a2632fadaddc6c276211f78b3f733f2a6f6 /src/bootstrap/main.c | |
| parent | 859c33f37f0174a7b9d76cdcbe889ff12047c99c (diff) | |
| download | bdl-ab6b56dfe916c17f34e684e69483895402783ae5.tar.gz bdl-ab6b56dfe916c17f34e684e69483895402783ae5.zip | |
Add proc_display and fix some bugs
Diffstat (limited to 'src/bootstrap/main.c')
| -rwxr-xr-x | src/bootstrap/main.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/bootstrap/main.c b/src/bootstrap/main.c index 419ce91..e5d9b17 100755 --- a/src/bootstrap/main.c +++ b/src/bootstrap/main.c | |||
| @@ -36,6 +36,7 @@ init(void) { | |||
| 36 | environment[env_n++] = (EnvSymbol){make_symbol("-", 1), make_procedure(proc_sub)}; | 36 | environment[env_n++] = (EnvSymbol){make_symbol("-", 1), make_procedure(proc_sub)}; |
| 37 | environment[env_n++] = (EnvSymbol){make_symbol("*", 1), make_procedure(proc_mul)}; | 37 | environment[env_n++] = (EnvSymbol){make_symbol("*", 1), make_procedure(proc_mul)}; |
| 38 | environment[env_n++] = (EnvSymbol){make_symbol("/", 1), make_procedure(proc_div)}; | 38 | environment[env_n++] = (EnvSymbol){make_symbol("/", 1), make_procedure(proc_div)}; |
| 39 | environment[env_n++] = (EnvSymbol){make_symbol("display", 7), make_procedure(proc_display)}; | ||
| 39 | } | 40 | } |
| 40 | 41 | ||
| 41 | void | 42 | void |