|
From: | Lars J. Aas |
Subject: | Re: namespaces, goops, etc. |
Date: | Fri, 3 Nov 2000 22:46:31 +0100 |
User-agent: | Mutt/1.2.5i |
I did it... [solution] (define (hiho) (define foo (make-generic 'foo)) (define-method (foo (x <integer>)) (display "integer: ") (display x) (display "\n")) (define-method (foo (x <string>)) (display "string: ") (display x) (display "\n")) foo) ((hiho) 42) ((hiho) "foo") Cheers, and thanks for the help on the way... Lars J
[Prev in Thread] | Current Thread | [Next in Thread] |