/*
* Copyright (c) 2012, 2012, Oracle and/or its affiliates. All rights reserved.
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* This code is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License version 2 only, as
* published by the Free Software Foundation. Oracle designates this
* particular file as subject to the "Classpath" exception as provided
* by Oracle in the LICENSE file that accompanied this code.
*
* This code is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
* version 2 for more details (a copy is included in the LICENSE file that
* accompanied this code).
*
* You should have received a copy of the GNU General Public License version
* 2 along with this work; if not, write to the Free Software Foundation,
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
*
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
* or visit www.oracle.com if you need additional information or have any
* questions.
*/
package com.oracle.truffle.api.dsl;
import com.oracle.truffle.api.nodes.Node;
import java.lang.annotation.ElementType;
import java.lang.annotation.Retention;
import java.lang.annotation.RetentionPolicy;
import java.lang.annotation.Target;
/**
* <p>
* Each {@link Node} has one {@link TypeSystem} at its root to define the types that can be used
* throughout the system. Multiple {@link TypeSystem}s are allowed, but they cannot be mixed inside
* a single {@link Node} hierarchy. A {@link TypeSystem} optionally defines a list of types as its
* child elements, in which every type precedes its super types. The latter condition ensures that
* the most concrete type is found first when searching the list sequentially for the type of a
* given generic value.
* </p>
*
* <p>
* Each {@link #value()} is represented as a Java type. A type can specify two annotations:
* {@link TypeCheck} and {@link TypeCast}. The {@link TypeCheck} checks whether a given generic
* value matches to the current type. The {@link TypeCast} casts a generic type value to the current
* type. If the {@link TypeCheck} and {@link TypeCast} annotations are not declared in the
* {@link TypeSystem} the a default implementation is provided. The default implementation of
* {@link TypeCheck} returns <code>true</code> only on an exact type match and {@link TypeCast} is
* only a cast to this type. Specified methods with {@link TypeCheck} and {@link TypeCast} may be
* used to extend the definition of a type in the language. In our example, the
* <code>isInteger</code> and <code>asInteger</code> methods are defined in a way so that they
* accept also {@link Integer} values, implicitly converting them to {@link Double} . This example
* points out how we express implicit type conversions.
* </p>
*
* <p>
* <b>Example:</b> The {@link TypeSystem} contains the types {@link Boolean}, {@link Integer}, and
* {@link Double}. The type {@link Object} is always used implicitly as the generic type represent
* all values.
*
* <pre>
*
* {@literal @}TypeSystem(types = {boolean.class, int.class, double.class})
* public abstract class ExampleTypeSystem {
*
* {@literal @}TypeCheck
* public boolean isInteger(Object value) {
* return value instanceof Integer || value instanceof Double;
* }
*
* {@literal @}TypeCast
* public double asInteger(Object value) {
* return ((Number)value).doubleValue();
* }
* }
* </pre>
*
*
* @see TypeCast
* @see TypeCheck
* @since 0.8 or earlier
*/
@Retention(RetentionPolicy.CLASS)
@Target({ElementType.TYPE})
public @interface TypeSystem {
/**
* The list of types as child elements of the {@link TypeSystem}. Each precedes its super type.
*/
Class<?>[] value() default {};
}