|
13 | 13 | import org.truffleruby.cext.ValueWrapperManager.AllocateHandleNode;
|
14 | 14 | import org.truffleruby.cext.ValueWrapperManager.HandleBlock;
|
15 | 15 | import org.truffleruby.core.MarkingServiceNodes.KeepAliveNode;
|
| 16 | +import org.truffleruby.debug.VariableNamesObject; |
16 | 17 | import org.truffleruby.interop.TranslateInteropExceptionNode;
|
17 | 18 |
|
18 | 19 | import com.oracle.truffle.api.CompilerDirectives.TruffleBoundary;
|
19 | 20 | import com.oracle.truffle.api.dsl.Cached;
|
20 | 21 | import com.oracle.truffle.api.dsl.Cached.Exclusive;
|
21 | 22 | import com.oracle.truffle.api.interop.InteropLibrary;
|
22 | 23 | import com.oracle.truffle.api.interop.TruffleObject;
|
| 24 | +import com.oracle.truffle.api.interop.UnknownIdentifierException; |
23 | 25 | import com.oracle.truffle.api.interop.UnsupportedMessageException;
|
24 | 26 | import com.oracle.truffle.api.library.ExportLibrary;
|
25 | 27 | import com.oracle.truffle.api.library.ExportMessage;
|
@@ -121,4 +123,30 @@ protected static long asPointer(ValueWrapper wrapper,
|
121 | 123 |
|
122 | 124 | return handle;
|
123 | 125 | }
|
| 126 | + |
| 127 | + @ExportMessage |
| 128 | + protected boolean hasMembers() { |
| 129 | + return true; |
| 130 | + } |
| 131 | + |
| 132 | + @ExportMessage |
| 133 | + protected Object getMembers(boolean includeInternal) { |
| 134 | + return new VariableNamesObject(new String[]{ "value" }); |
| 135 | + } |
| 136 | + |
| 137 | + @ExportMessage |
| 138 | + protected boolean isMemberReadable(String member) { |
| 139 | + return "value".equals(member); |
| 140 | + } |
| 141 | + |
| 142 | + @ExportMessage |
| 143 | + protected static Object readMember(ValueWrapper wrapper, String member, |
| 144 | + @Cached @Exclusive BranchProfile errorProfile) throws UnknownIdentifierException { |
| 145 | + if ("value".equals(member)) { |
| 146 | + return wrapper.object; |
| 147 | + } else { |
| 148 | + errorProfile.enter(); |
| 149 | + throw UnknownIdentifierException.create(member); |
| 150 | + } |
| 151 | + } |
124 | 152 | }
|
0 commit comments