diff options
author | Karl Berry <karl@freefriends.org> | 2009-08-15 23:57:48 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2009-08-15 23:57:48 +0000 |
commit | 16d128e5e10d541a78654b86409d5a3539f07708 (patch) | |
tree | 66de0af63c3811bb3040c16e9b52c11985f70811 /Build/source/utils/asymptote/virtualfieldaccess.cc | |
parent | b20f78c549859ec0e8610bdd3ad904245e86b489 (diff) |
asymptote 1.83
git-svn-id: svn://tug.org/texlive/trunk@14696 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/virtualfieldaccess.cc')
-rw-r--r-- | Build/source/utils/asymptote/virtualfieldaccess.cc | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/virtualfieldaccess.cc b/Build/source/utils/asymptote/virtualfieldaccess.cc new file mode 100644 index 00000000000..13cb088d2ac --- /dev/null +++ b/Build/source/utils/asymptote/virtualfieldaccess.cc @@ -0,0 +1,41 @@ +/***** + * virtualfieldaccess.cc + * Andy Hammerlindl 2009/07/23 + * + * Implements the access subclass used to read and write virtual fields. + *****/ + +#include "virtualfieldaccess.h" +#include "coder.h" + +namespace trans { + +inline void virtualFieldAccess::encode(action act, position pos, coder &e) +{ + switch(act) { + case CALL: + this->encode(READ, pos, e); + e.encode(inst::popcall); + return; + case READ: + assert(getter); + getter->encode(CALL, pos, e); + return; + case WRITE: + if (setter) + setter->encode(CALL, pos, e); + else { + em.error(pos); + em << "virtual field is read-only"; + } + return; + } +} + +void virtualFieldAccess::encode(action act, position pos, coder &e, frame *) +{ + e.encode(inst::pop); + encode(act, pos, e); +} + +} // namespace trans |