Re: problem with make-procedure-with-setter

[Mikael Djurfeldt]

Keisuke Nishida <[EMAIL PROTECTED]> writes:

> guile> (define f (make-procedure-with-setter (lambda (a) a) (lambda (a v) v)))
> guile> (f)
> standard input:5:1: In expression (f):
> standard input:5:1: Bad memory access (Segmentation violation)
> ABORT: (signal)
> guile> 
> 
> I think this should throw a wrong-number-of-args error

* eval.c (scm_badformalsp): New static function.
  (SCM_CEVAL): Check arguments for procedure-with-setter closures.
  (Thanks to Keisuke Nishida.)