From 1fa1eb6201a277b037f047214c4a97f34a6aeba2 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 7 Nov 2018 06:29:57 -0800 Subject: lazy strings: remove two type checks. * lib.c (lazy_str_put, out_lazy_str): The very few calls to these functions already ensure that the object is a lazy string; let's drop the check. --- lib.c | 2 -- 1 file changed, 2 deletions(-) (limited to 'lib.c') diff --git a/lib.c b/lib.c index 0ab7085b..506905af 100644 --- a/lib.c +++ b/lib.c @@ -7636,7 +7636,6 @@ val lazy_str_force(val lstr) val lazy_str_put(val lstr, val stream) { val lim, term, iter; - type_check(lstr, LSTR); lim = lstr->ls.props->limit; term = lstr->ls.props->term; @@ -10924,7 +10923,6 @@ static void out_lazy_str(val lstr, val out) val lim, term, iter; const wchar_t *wcterm; - type_check(lstr, LSTR); lim = lstr->ls.props->limit; term = lstr->ls.props->term; wcterm = c_str(term); -- cgit v1.2.3