From 8656383c44f2080e59c526ff3b7fb7ac4c2301a9 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Mon, 17 Oct 2016 22:00:26 -0700
Subject: Provide functions to alter range objects.

Ranges continue to be immutable; but a
backdoor is needed for upcoming support for
circular notation.

* lib.c (set_from, set_to): New functions.

* lib.h (set_from, set_to): Declared.
---
 lib.h | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib.h')

diff --git a/lib.h b/lib.h
index adf88b3c..9e1405a0 100644
--- a/lib.h
+++ b/lib.h
@@ -971,6 +971,8 @@ val rcons(val from, val to);
 val rangep(val obj);
 val from(val range);
 val to(val range);
+val set_from(val range, val from);
+val set_to(val range, val to);
 val env(void);
 void out_str_char(wchar_t ch, val out, int *semi_flag);
 val obj_print_impl(val obj, val out, val pretty);
-- 
cgit v1.2.3