From bcea7ce1ef9380cff6fe2860525a706008672f1d Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 6 Jun 2019 13:05:09 -0400
Subject: [PATCH] Fix logical error

---
 runtime.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/runtime.c b/runtime.c
index 71cf69a9..f10d2ca2 100644
--- a/runtime.c
+++ b/runtime.c
@@ -5689,7 +5689,7 @@ void Cyc_make_shared_object(void *data, object k, object obj)
   object buf[1];
   int tmp, *heap_grown = &tmp;
   if (!is_object_type(obj) || // Immediates do not have to be moved
-      gc_is_stack_obj(data, obj)) { // Not thread-local, assume already on heap
+      !gc_is_stack_obj(data, obj)) { // Not thread-local, assume already on heap
     return_closcall1(data, k, obj);
   }