scheme@(guile-user)> (define-class <foo> ())
scheme@(guile-user)> (define-method (display (self <foo>)) (display "foo"))
scheme@(guile-user)> (display (make <foo>)) (newline)
#<<foo> 2f428f0>
Also, applying functions like 'generic-function-methods' to 'display' gives a type error:
>scheme@(guile-user)> (generic-function-methods display)
ERROR: In procedure generic-function-methods:
ERROR: In procedure generic-function-methods: Wrong type argument in position 1 (expecting generic function): #<procedure display (_ #:optional _)>
What am I doing wrong?
Cheers,
Tobias