From f982d9a741201927d246f9ece3456f331668a4ae Mon Sep 17 00:00:00 2001 From: Tim Vaughan Date: Sun, 23 Apr 2017 23:00:06 +1200 Subject: [PATCH] Forgot to tell GC that ports are now pair-like. Impotant, because otherwise their contents aren't marked by the mark/sweep algorithm and wind up getting clobbered. --- src/scheme.4th | 1 + 1 file changed, 1 insertion(+) diff --git a/src/scheme.4th b/src/scheme.4th index 5ee0dbd..677dd9d 100644 --- a/src/scheme.4th +++ b/src/scheme.4th @@ -1894,6 +1894,7 @@ variable gc-stack-depth string-type istype? if true exit then symbol-type istype? if true exit then compound-proc-type istype? if true exit then + port-type istype? if true exit then false ; -- 2.20.1