From 2b54c0bc0a758ce03edc9e53357f0f1c93a1c963 Mon Sep 17 00:00:00 2001
From: Simon Forman <sforman@hushmail.com>
Date: Tue, 7 Feb 2023 20:53:44 -0800
Subject: [PATCH] Initializers for Boolean values.

---
 implementations/C/joy.c | 19 +++++--------------
 1 file changed, 5 insertions(+), 14 deletions(-)

diff --git a/implementations/C/joy.c b/implementations/C/joy.c
index 6bdcfb3..f37f23d 100644
--- a/implementations/C/joy.c
+++ b/implementations/C/joy.c
@@ -44,10 +44,12 @@ const char *BLANKS = " \t";
 const char *FALSE = "false";
 const char *TRUE = "true";
 
-JoyTypePtr JoyTrue;
-JoyTypePtr JoyFalse;
-
 JoyType loop_symbol = {joySymbol, {"loop"}};
+JoyType JoyTrueVal = {joyTrue, {NULL}};
+JoyType JoyFalseVal = {joyFalse, {NULL}};
+
+JoyTypePtr JoyTrue = &JoyTrueVal;
+JoyTypePtr JoyFalse = &JoyFalseVal;
 
 
 void*
@@ -800,17 +802,6 @@ main(void)
 	JoyList expression = EMPTY_LIST;
 	JoyList s;
 
-	/* Initialize Boolean singleton values. */
-	JoyTrue = newJoyType;
-	JoyTrue->kind = joyTrue;
-	JoyFalse= newJoyType;
-	JoyFalse->kind = joyFalse;
-	/*
-	I would like to define this at compile-time, but I
-	couldn't figure out the right syntax for initializer
-	for JoyType.value.  (T_T)
-	*/
-
 	mp_set_memory_functions(
 		&GC_malloc,
 		&reallocate_function,