[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Applicable GOOPS objects?
From: |
Mark H Weaver |
Subject: |
Re: Applicable GOOPS objects? |
Date: |
Sat, 24 Mar 2012 02:23:49 -0400 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.92 (gnu/linux) |
BT Templeton <address@hidden> writes:
> Mark H Weaver <address@hidden> 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
>> suboptimal.
[...]
>
> 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
> <applicable-struct-class>?
Yes, I believe it will. Thanks very much! :)
Mark
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.