diff options
author | Josh Stone <jistone@redhat.com> | 2009-07-15 18:21:56 -0700 |
---|---|---|
committer | Josh Stone <jistone@redhat.com> | 2009-07-15 18:35:48 -0700 |
commit | 03c75a4a21ef3dba8abbc7e596d2a102427a3d96 (patch) | |
tree | 82e48a6a13454b9d0967b6d7e029aaf137ae47b9 /tapset-perfmon.cxx | |
parent | af4d5a48f2b0fed8b5a1bddda9bd1ffa81e7bd46 (diff) | |
download | systemtap-steved-03c75a4a21ef3dba8abbc7e596d2a102427a3d96.tar.gz systemtap-steved-03c75a4a21ef3dba8abbc7e596d2a102427a3d96.tar.xz systemtap-steved-03c75a4a21ef3dba8abbc7e596d2a102427a3d96.zip |
PR5930: Address-op for $target and @cast members
This allows the '&' operator to get the address of @cast and $target
variable expressions.
* staptree.h (target_symbol): add addressof field
* staptree.cxx (target_symbol::print): print '&' for addressof
(cast_op::print): ditto
* parse.cxx (parser::parse_value): allow '&' prefix on $target/@cast
* dwflpp.cxx (dwflpp::translate_final_fetch_or_store): allow taking the
computed address without actually doing a final fetch.
* tapset* (*::visit_target_symbol): throw errors for $vars w/o addresses
* testsuite/systemtap.base/cast.stp: add &@cast test
* testsuite/semok/target_addr.stp: test '&' on different member types
* testsuite/semko/target_addr?.stp: test failure on bitfields/registers
Diffstat (limited to 'tapset-perfmon.cxx')
-rw-r--r-- | tapset-perfmon.cxx | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tapset-perfmon.cxx b/tapset-perfmon.cxx index e3f30ece..0fb567f7 100644 --- a/tapset-perfmon.cxx +++ b/tapset-perfmon.cxx @@ -64,6 +64,9 @@ perfmon_var_expanding_visitor::visit_target_symbol (target_symbol *e) if (e->base_name != "$counter") throw semantic_error ("target variables not available to perfmon probes"); + if (e->addressof) + throw semantic_error("cannot take address of perfmon variable", e->tok); + if (e->components.size() > 0) { switch (e->components[0].first) |