```
let address-thunk = method () pointer-address(g-value-peek-pointer(instance)) end
```
seems much clearer.  Did I even get that right?  Not sure.