com.oracle.truffle.tck.StructuredDataMessageResolutionForeign Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of truffle-tck Show documentation
Show all versions of truffle-tck Show documentation
A collection of tests that can certify language implementation to be compliant
with most recent requirements of the Truffle infrastructure and tooling.
package com.oracle.truffle.tck;
import com.oracle.truffle.api.CallTarget;
import com.oracle.truffle.api.Truffle;
import com.oracle.truffle.api.dsl.Specialization;
import com.oracle.truffle.api.dsl.UnsupportedSpecializationException;
import com.oracle.truffle.api.frame.VirtualFrame;
import com.oracle.truffle.api.interop.ForeignAccess;
import com.oracle.truffle.api.interop.ForeignAccess.Factory;
import com.oracle.truffle.api.interop.ForeignAccess.StandardFactory;
import com.oracle.truffle.api.interop.Message;
import com.oracle.truffle.api.interop.TruffleObject;
import com.oracle.truffle.api.interop.UnsupportedTypeException;
import com.oracle.truffle.api.nodes.RootNode;
/**
* This foreign access factory is generated by {@link com.oracle.truffle.tck.StructuredDataMessageResolution}.
* You are supposed to use it for the receiver object {@link com.oracle.truffle.tck.StructuredData}.
*/
final class StructuredDataMessageResolutionForeign implements StandardFactory, Factory {
public static final ForeignAccess ACCESS = ForeignAccess.create(new StructuredDataMessageResolutionForeign(), null);
@Deprecated public static ForeignAccess createAccess() { return ForeignAccess.create(new StructuredDataMessageResolutionForeign(), null); }
private StructuredDataMessageResolutionForeign() { }
@Override
public boolean canHandle(TruffleObject obj) {
return com.oracle.truffle.tck.StructuredData.isInstance(obj);
}
@Override
public CallTarget accessIsNull() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessIsExecutable() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessIsInstantiable() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessIsBoxed() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessHasKeys() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessHasSize() {
return Truffle.getRuntime().createCallTarget(StructuredDataHasSizeSubNode.createRoot());
}
@Override
public CallTarget accessGetSize() {
return com.oracle.truffle.api.Truffle.getRuntime().createCallTarget(StructuredDataGetSizeSubNode.createRoot());
}
@Override
public CallTarget accessUnbox() {
return null;
}
@Override
public CallTarget accessRead() {
return com.oracle.truffle.api.Truffle.getRuntime().createCallTarget(StructuredDataReadSubNode.createRoot());
}
@Override
public CallTarget accessWrite() {
return null;
}
@Override
public CallTarget accessRemove() {
return null;
}
@Override
public CallTarget accessExecute(int argumentsLength) {
return null;
}
@Override
public CallTarget accessInvoke(int argumentsLength) {
return null;
}
@Override
public CallTarget accessNew(int argumentsLength) {
return null;
}
@Override
public CallTarget accessKeyInfo() {
return null;
}
@Override
public CallTarget accessKeys() {
return null;
}
@Override
public CallTarget accessIsPointer() {
return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
}
@Override
public CallTarget accessAsPointer() {
return null;
}
@Override
public CallTarget accessToNative() {
return null;
}
@Override
public CallTarget accessMessage(Message unknown) {
return null;
}
/**
* This message resolution is generated by {@link com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataReadNode}.
*/
abstract static class StructuredDataReadSubNode extends com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataReadNode {
public abstract Object executeWithTarget(VirtualFrame frame, Object o0, Object o1);
@Specialization
protected Object accessWithTarget(com.oracle.truffle.tck.StructuredData data, java.lang.Number index) {
return access(data, index);
}
private static final class READRootNode extends RootNode {
protected READRootNode() {
super(null);
}
@Child private StructuredDataReadSubNode node = com.oracle.truffle.tck.StructuredDataMessageResolutionForeignFactory.StructuredDataReadSubNodeGen.create();
@Override
public String getName() {
return "Interop::READ::com.oracle.truffle.tck.StructuredData";
}
@Override
public Object execute(VirtualFrame frame) {
Object receiver = ForeignAccess.getReceiver(frame);
Object identifier = ForeignAccess.getArguments(frame).get(0);
try {
return node.executeWithTarget(frame, receiver, identifier);
} catch (UnsupportedSpecializationException e) {
if (e.getNode() instanceof StructuredDataReadSubNode) {
throw UnsupportedTypeException.raise(e, e.getSuppliedValues());
} else {
throw e;
}
}
}
}
public static RootNode createRoot() {
return new READRootNode();
}
}
/**
* This message resolution is generated by {@link com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataGetSizeNode}.
*/
abstract static class StructuredDataGetSizeSubNode extends com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataGetSizeNode {
public abstract Object executeWithTarget(VirtualFrame frame, Object o0);
@Specialization
protected Object accessWithTarget(com.oracle.truffle.tck.StructuredData data) {
return access(data);
}
private static final class GET_SIZERootNode extends RootNode {
protected GET_SIZERootNode() {
super(null);
}
@Child private StructuredDataGetSizeSubNode node = com.oracle.truffle.tck.StructuredDataMessageResolutionForeignFactory.StructuredDataGetSizeSubNodeGen.create();
@Override
public String getName() {
return "Interop::GET_SIZE::com.oracle.truffle.tck.StructuredData";
}
@Override
public Object execute(VirtualFrame frame) {
Object receiver = ForeignAccess.getReceiver(frame);
try {
return node.executeWithTarget(frame, receiver);
} catch (UnsupportedSpecializationException e) {
if (e.getNode() instanceof StructuredDataGetSizeSubNode) {
throw UnsupportedTypeException.raise(e, e.getSuppliedValues());
} else {
throw e;
}
}
}
}
public static RootNode createRoot() {
return new GET_SIZERootNode();
}
}
/**
* This message resolution is generated by {@link com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataHasSizeNode}.
*/
abstract static class StructuredDataHasSizeSubNode extends com.oracle.truffle.tck.StructuredDataMessageResolution.StructuredDataHasSizeNode {
public abstract Object executeWithTarget(VirtualFrame frame, Object o0);
@Specialization
protected Object accessWithTarget(com.oracle.truffle.tck.StructuredData data) {
return access(data);
}
private static final class HAS_SIZERootNode extends RootNode {
protected HAS_SIZERootNode() {
super(null);
}
@Child private StructuredDataHasSizeSubNode node = com.oracle.truffle.tck.StructuredDataMessageResolutionForeignFactory.StructuredDataHasSizeSubNodeGen.create();
@Override
public String getName() {
return "Interop::HAS_SIZE::com.oracle.truffle.tck.StructuredData";
}
@Override
public Object execute(VirtualFrame frame) {
Object receiver = ForeignAccess.getReceiver(frame);
try {
return node.executeWithTarget(frame, receiver);
} catch (UnsupportedSpecializationException e) {
if (e.getNode() instanceof StructuredDataHasSizeSubNode) {
throw UnsupportedTypeException.raise(e, e.getSuppliedValues());
} else {
throw e;
}
}
}
}
public static RootNode createRoot() {
return new HAS_SIZERootNode();
}
}
}
© 2015 - 2024 Weber Informatics LLC | Privacy Policy