| 14 | } |
| 15 | |
| 16 | inline void set__(SEXP x){ |
| 17 | data = x ; |
| 18 | |
| 19 | // calls the update method of CLASS |
| 20 | // this is where to react to changes in the underlying SEXP |
| 21 | static_cast<CLASS&>(*this).update(data) ; |
| 22 | } |
| 23 | |
| 24 | inline SEXP get__() const { |
| 25 | return data ; |