set -> set!

1 files changed, 1 insertions, 1 deletions

diff --git a/com.c b/com.c
index 19ea302..0273866 100644
--- a/com.c
+++ b/com.c
@@ -572,7 +572,7 @@ typedef struct {
 } BuiltinForm;
 
 static BuiltinForm builtin_forms[] = {
-	{ "set",   2, false, set_form, 0 },
+	{ "set!",   2, false, set_form, 0 },
 	{ "do",    1,  true, do_form, 0 },
 	{ "if",    3, false, if_form, 0 },
 	{ "while", 2,  true, while_form, 0 },