Re: [racket-users] How to specify fallbacks for generic interfaces without going into an infinite loop?

2015-07-06 Thread Jon Zeppieri
Use define/generic: #lang racket/base (require racket/generic) (define-generics foo (a foo) (b foo) (c foo) #:fallbacks [(define/generic gen-a a) (define/generic gen-b b) (define (a foo) (displayln a-fallback) (gen-b foo)) (define (b foo) (displayln b-fallback)

[racket-users] How to specify fallbacks for generic interfaces without going into an infinite loop?

2015-07-06 Thread Alexander D. Knauth
What is the proper way to do this? This goes into an infinite loop: #lang racket/base (require racket/generic) (define-generics foo (a foo) (b foo) (c foo) #:fallbacks [(define (a foo) (displayln a-fallback) (b foo)) (define (b foo) (displayln b-fallback) (a

Re: [racket-users] How to specify fallbacks for generic interfaces without going into an infinite loop?

2015-07-06 Thread Alexander D. Knauth
Thanks! On Jul 6, 2015, at 9:53 PM, Jon Zeppieri zeppi...@gmail.com wrote: Use define/generic: #lang racket/base (require racket/generic) (define-generics foo (a foo) (b foo) (c foo) #:fallbacks [(define/generic gen-a a) (define/generic gen-b b) (define (a foo)