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