{"body":"+   6     method COMPOSE {                                                                                                                                                                                                                    \n+   7         for ::?CLASS!attr-columns -> $attr {                                                                                                                                                                                            \n+   8             my $attr-name = $attr.name.substr(2);                                                                                                                                                                                       \n+   9             with ::?CLASS.^find_method($attr-name) {                                                                                                                                                                                    \n+  10                 .wrap: method () is rw {                                                                                                                                                                                                \n+  11                     Proxy.new:                                                                                                                                                                                                          \n+  12                         FETCH => method (|) {say \"FETCH\" ; nextsame},                                                                                                                                                                   \n+  13                         STORE => method (|) {say \"STORE\" ; $attr.is-dirty = True; nextsame}                                                                                                                                             \n+  14                 }                                                                                                                                                                                                                       \n+  15             }                                                                                                                                                                                                                           \n+  16         }                                                                                                                                                                                                                               \n+  17     } ","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/aT82QkxL","modified":1485652748,"id":"aT82QkxL","size":2641,"lines":12,"own_paste":false,"theme":"","date":1485652748}