I have
(struct object (a b c))
(struct reference (id data))
Let `ref' -- an instance of `reference'.
I want, that (object-a ref) call my own (ref-get object-a ref)
(define (ref-get accessor ref)
(unless (weak-box-value (ref-data ref))
(set-ref-data! ref (make-weak-box (load-data (ref-id ref)))))
(accessor (weak-box-value (ref-data ref))))
Is it possible?
I found `impersonate-struct', but it is not struct itself (no `id' field).
I can add `prop:impersonator-of',. but how to redirect accessors?
--
Roman Klochkov
____________________
Racket Users list:
http://lists.racket-lang.org/users
