com.oracle.truffle.tck.ComplexNumbersAMessageResolutionForeign 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
A collection of tests that can certify language implementation to be compliant with most recent requirements of the Truffle infrastructure and tooling.
There is a newer version: 1.0.0-rc7
Show newest version
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.Factory26;
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.ComplexNumbersAMessageResolution}.
 * You are supposed to use it for the receiver object {@link com.oracle.truffle.tck.ComplexNumbersA}.
 */
final class ComplexNumbersAMessageResolutionForeign implements Factory26, Factory {
    public static final ForeignAccess ACCESS = ForeignAccess.create(new ComplexNumbersAMessageResolutionForeign(), null);
    @Deprecated public static ForeignAccess createAccess() { return ForeignAccess.create(new ComplexNumbersAMessageResolutionForeign(), null); }

    private ComplexNumbersAMessageResolutionForeign() { }

    @Override
    public boolean canHandle(TruffleObject obj) {
        return com.oracle.truffle.tck.ComplexNumbersA.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 accessIsBoxed() {
      return Truffle.getRuntime().createCallTarget(RootNode.createConstantNode(false));
    }
    @Override
    public CallTarget accessHasSize() {
      return Truffle.getRuntime().createCallTarget(ComplexNumbersAHasSizeSubNode.createRoot());
    }
    @Override
    public CallTarget accessGetSize() {
      return com.oracle.truffle.api.Truffle.getRuntime().createCallTarget(ComplexNumbersAGetSizeSubNode.createRoot());
    }
    @Override
    public CallTarget accessUnbox() {
      return null;
    }
    @Override
    public CallTarget accessRead() {
      return com.oracle.truffle.api.Truffle.getRuntime().createCallTarget(ComplexNumbersAReadSubNode.createRoot());
    }
    @Override
    public CallTarget accessWrite() {
      return com.oracle.truffle.api.Truffle.getRuntime().createCallTarget(ComplexNumbersAWriteSubNode.createRoot());
    }
    @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.ComplexNumbersAMessageResolution.ComplexNumbersAWriteNode}.
     */
    abstract static class ComplexNumbersAWriteSubNode extends com.oracle.truffle.tck.ComplexNumbersAMessageResolution.ComplexNumbersAWriteNode {
        public abstract Object executeWithTarget(VirtualFrame frame, Object o0, Object o1, Object o2);
        @Specialization
        protected Object accessWithTarget(com.oracle.truffle.tck.ComplexNumbersA complexNumbers, java.lang.Number index, com.oracle.truffle.api.interop.TruffleObject value) {
            return access(complexNumbers, index, value);
        }
        private static final class WriteRootNode extends RootNode {
            protected WriteRootNode() {
                super(null);
            }

            @Child private ComplexNumbersAWriteSubNode node = com.oracle.truffle.tck.ComplexNumbersAMessageResolutionForeignFactory.ComplexNumbersAWriteSubNodeGen.create();
            @Override
            public Object execute(VirtualFrame frame) {
                Object receiver = ForeignAccess.getReceiver(frame);
                Object identifier = ForeignAccess.getArguments(frame).get(0);
                Object value = ForeignAccess.getArguments(frame).get(1);
                try {
                    return node.executeWithTarget(frame, receiver, identifier, value);
                } catch (UnsupportedSpecializationException e) {
                    if (e.getNode() instanceof ComplexNumbersAWriteSubNode) {
                      throw UnsupportedTypeException.raise(e, e.getSuppliedValues());
                    } else {
                      throw e;
                    }
                }
            }

        }
        public static RootNode createRoot() {
            return new WriteRootNode();
        }
    }

    /**
     * This message resolution is generated by {@link com.oracle.truffle.tck.ComplexNumbersAMessageResolution.ComplexNumbersAReadNode}.
     */
    abstract static class ComplexNumbersAReadSubNode extends com.oracle.truffle.tck.ComplexNumbersAMessageResolution.ComplexNumbersAReadNode {
        public abstract Object executeWithTarget(VirtualFrame frame, Object o0, Object o1);
        @Specialization
        protected Object accessWithTarget(com.oracle.truffle.tck.ComplexNumbersA complexNumbers, java.lang.Number index) {
            return access(complexNumbers, index);
        }
        private static final class READRootNode extends RootNode {
            protected READRootNode() {
                super(null);
            }

            @Child private ComplexNumbersAReadSubNode node = com.oracle.truffle.tck.ComplexNumbersAMessageResolutionForeignFactory.ComplexNumbersAReadSubNodeGen.create();
            @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 ComplexNumbersAReadSubNode) {
                      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.ComplexNumbersAMessageResolution.ComplexNumbersAGetSizeNode}.
     */
    abstract static class ComplexNumbersAGetSizeSubNode extends com.oracle.truffle.tck.ComplexNumbersAMessageResolution.ComplexNumbersAGetSizeNode {
        public abstract Object executeWithTarget(VirtualFrame frame, Object o0);
        @Specialization
        protected Object accessWithTarget(com.oracle.truffle.tck.ComplexNumbersA complexNumbers) {
            return access(complexNumbers);
        }
        private static final class GET_SIZERootNode extends RootNode {
            protected GET_SIZERootNode() {
                super(null);
            }

            @Child private ComplexNumbersAGetSizeSubNode node = com.oracle.truffle.tck.ComplexNumbersAMessageResolutionForeignFactory.ComplexNumbersAGetSizeSubNodeGen.create();
            @Override
            public Object execute(VirtualFrame frame) {
                Object receiver = ForeignAccess.getReceiver(frame);
                try {
                    return node.executeWithTarget(frame, receiver);
                } catch (UnsupportedSpecializationException e) {
                    if (e.getNode() instanceof ComplexNumbersAGetSizeSubNode) {
                      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.ComplexNumbersAMessageResolution.ComplexNumbersAHasSizeNode}.
     */
    abstract static class ComplexNumbersAHasSizeSubNode extends com.oracle.truffle.tck.ComplexNumbersAMessageResolution.ComplexNumbersAHasSizeNode {
        public abstract Object executeWithTarget(VirtualFrame frame, Object o0);
        @Specialization
        protected Object accessWithTarget(com.oracle.truffle.tck.ComplexNumbersA complexNumbers) {
            return access(complexNumbers);
        }
        private static final class HAS_SIZERootNode extends RootNode {
            protected HAS_SIZERootNode() {
                super(null);
            }

            @Child private ComplexNumbersAHasSizeSubNode node = com.oracle.truffle.tck.ComplexNumbersAMessageResolutionForeignFactory.ComplexNumbersAHasSizeSubNodeGen.create();
            @Override
            public Object execute(VirtualFrame frame) {
                Object receiver = ForeignAccess.getReceiver(frame);
                try {
                    return node.executeWithTarget(frame, receiver);
                } catch (UnsupportedSpecializationException e) {
                    if (e.getNode() instanceof ComplexNumbersAHasSizeSubNode) {
                      throw UnsupportedTypeException.raise(e, e.getSuppliedValues());
                    } else {
                      throw e;
                    }
                }
            }

        }
        public static RootNode createRoot() {
            return new HAS_SIZERootNode();
        }
    }
}