[Chicken-janitors] #1590: xsubstring with `to' argument less than string length results in a crash

[Chicken Trac]

#1590: xsubstring with `to' argument less than string length results in a crash
-------------------------------+------------------------------
 Reporter:  dieggsy            |                 Owner:
     Type:  defect             |                Status:  new
 Priority:  major              |             Milestone:
Component:  core libraries     |               Version:  5.0.0
 Keywords:  srfi13,xsubstring  |  Estimated difficulty:
-------------------------------+------------------------------
 I would expect:

 {{{
 (xsubstring "foo" 0 2) => "fo"
 }}}

 But I get:

 {{{
 #;4> (xsubstring "foo" 0 2)
 [panic] Detected corrupted data in stack - execution terminated

 <syntax>
 <eval>  <--
 }}}

--
Ticket URL: <https://bugs.call-cc.org/ticket/1590>
CHICKEN Scheme <https://www.call-cc.org/>
CHICKEN Scheme is a compiler for the Scheme programming language.