diff options
| author | Bad Diode <bd@badd10de.dev> | 2021-10-13 20:16:31 +0200 |
|---|---|---|
| committer | Bad Diode <bd@badd10de.dev> | 2021-10-13 20:16:31 +0200 |
| commit | 3ed2c60da6ef2e18d7e273cf39056833c5b41c13 (patch) | |
| tree | f0b1f5e852bb46374a2815198db219b01a7bfa0b /src/bootstrap/main.c | |
| parent | 101c6fdce11e26cd43ec85d7ae0590957cbe1c51 (diff) | |
| download | bdl-3ed2c60da6ef2e18d7e273cf39056833c5b41c13.tar.gz bdl-3ed2c60da6ef2e18d7e273cf39056833c5b41c13.zip | |
Add the define `def` procedure
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 945e121..e8e530d 100755 --- a/src/bootstrap/main.c +++ b/src/bootstrap/main.c | |||
| @@ -71,6 +71,7 @@ init(void) { | |||
| 71 | MAKE_ENV_PROC(global_env, ">=", proc_num_greatereq_than); | 71 | MAKE_ENV_PROC(global_env, ">=", proc_num_greatereq_than); |
| 72 | MAKE_ENV_PROC(global_env, "=", proc_num_equal); | 72 | MAKE_ENV_PROC(global_env, "=", proc_num_equal); |
| 73 | MAKE_ENV_PROC(global_env, "eq?", proc_equal); | 73 | MAKE_ENV_PROC(global_env, "eq?", proc_equal); |
| 74 | MAKE_ENV_PROC(global_env, "def", proc_define); | ||
| 74 | } | 75 | } |
| 75 | 76 | ||
| 76 | void | 77 | void |