summaryrefslogtreecommitdiffstats
path: root/gc.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2015-10-25 11:33:22 -0700
committerKaz Kylheku <kaz@kylheku.com>2015-10-25 11:33:22 -0700
commitddd9073c71ea80702a0c3d67ebd644b5f93ce07e (patch)
tree15d57880d53145ae494d4d60db179421eac47af7 /gc.c
parent09f172c98f79f52a6e5c0e4ec87918a6e74aaccf (diff)
downloadtxr-ddd9073c71ea80702a0c3d67ebd644b5f93ce07e.tar.gz
txr-ddd9073c71ea80702a0c3d67ebd644b5f93ce07e.tar.bz2
txr-ddd9073c71ea80702a0c3d67ebd644b5f93ce07e.zip
Expose memory region marking function.
* gc.c (gc_mark_mem): New function. * gc.h (gc_mark_mem): Declared.
Diffstat (limited to 'gc.c')
-rw-r--r--gc.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/gc.c b/gc.c
index 7762a3a2..4892f133 100644
--- a/gc.c
+++ b/gc.c
@@ -735,6 +735,11 @@ void gc_conservative_mark(val maybe_obj)
mark_obj_maybe(maybe_obj);
}
+void gc_mark_mem(val *low, val *high)
+{
+ mark_mem_region(low, high);
+}
+
int gc_is_reachable(val obj)
{
return is_ptr(obj) ? is_reachable(obj) : 1;