bug#39395: GOOPS generic promotion fails for nary functions

2020-02-06 Thread Rob Browning
Rob Browning writes: > And then I found that the the manual says this: > > If symbol was previously bound to a Scheme procedure (or > procedure-with-setter), the old procedure (and setter) is incorporated > into the new generic function as its default procedure (and setter). > > So I

bug#39395: GOOPS generic promotion fails for nary functions

2020-02-02 Thread Rob Browning
I noticed that this fails in (at least) 2.0, 2.2 and 3.0: (use-modules (oop goops)) (define (foo . rest) 'fallback) (define-method (foo (x )) ) e.g.: $ guile-3.0 -s test.scm Backtrace: In ice-9/boot-9.scm: 1736:10 6 (with-exception-handler _ _ #:unwind? _ # _) In unknown