> Mark H Weaver <mhw@netr...> writes:
>> Hello all,
>> I was chatting with the folks working on Python-on-Guile, and it seems
>> clear that they need the ability to create GOOPS objects that can
>> emulate procedures. Otherwise they will probably end up creating an
>> entirely separate object system for Python, which would obviously be
> GOOPS defines an <applicable-struct-class> metaclass for this (similar
> to AMOP's funcallable-standard-class):
> scheme@(guile-user)> (define-class <foo> (<applicable-struct>))
> scheme@(guile-user)> ((make <foo> #:procedure car) '(1 2))
> $1 = 1
> Would it work to simply have all Python metaclasses inherit from
Yes, I believe it will. Thanks very much! :)
PS: I notice that there's also 'scm_class_applicable_struct_with_setter'
which is exported as SCM_API, but was apparently never implemented
and is always NULL.