Mark H Weaver writes:
> Tommi Höynälänmaa writes:
>
>> The following code causes command "guild compile" to hang:
>> ---cut here---
>> (define (select-nearest-methods binder
>> index v-fixed-args v-rest-arg vb-included)
>> (dwl4 "select-nearest-methods")
>> (assert (is-binder
Hi,
Tommi Höynälänmaa writes:
> The following code causes command "guild compile" to hang:
> ---cut here---
> (define (select-nearest-methods binder
> index v-fixed-args v-rest-arg vb-included)
> (dwl4 "select-nearest-methods")
> (assert (is-binder? binder))
> (let ((n (vec
The following code causes command "guild compile" to hang:
---cut here---
(define (select-nearest-methods binder
index v-fixed-args v-rest-arg vb-included)
(dwl4 "select-nearest-methods")
(assert (is-binder? binder))
(let ((n (vector-length vb-included)))
(do ((i 0 (+ i 1)
