From 883926076398a3f2cd8b7954e77ada53080c0dbf Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Fri, 10 Jul 2015 17:25:30 +0000 Subject: [PATCH] Fix botched ()/#F split in continuation parser. No more `The object (), passed as an argument to stream-car, is not a pair.' when trying to debug SIGFPE! --- src/runtime/conpar.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/runtime/conpar.scm b/src/runtime/conpar.scm index 505264ab1..ed600080c 100644 --- a/src/runtime/conpar.scm +++ b/src/runtime/conpar.scm @@ -672,7 +672,7 @@ USA. length (length stream offset)))) (ltail (stream-tail* stream length))) - (and ltail + (and (stream-pair? ltail) (return-address? (stream-car ltail)) (verify (- paranoia-index 1) ltail -- 2.25.1