Type.ceylon
import ceylon.ast.core {
Type
}
import com.redhat.ceylon.compiler.typechecker.tree {
Tree {
JEntryType=EntryType,
JFunctionType=FunctionType,
JGroupedType=GroupedType,
JIntersectionType=IntersectionType,
JIterableType=IterableType,
JOptionalType=OptionalType,
JSequenceType=SequenceType,
JSimpleType=SimpleType,
JStaticType=StaticType,
JTupleType=TupleType,
JUnionType=UnionType
}
}
import ceylon.ast.redhat {
groupedTypeToCeylon,
createParser,
simpleTypeToCeylon
}
"Converts a RedHat AST [[StaticType|JStaticType]] to a `ceylon.ast` [[Type]]."
shared Type typeToCeylon(JStaticType type) {
assert (is JSimpleType|JOptionalType|JSequenceType|JTupleType|JIterableType|JUnionType|JIntersectionType|JFunctionType|JGroupedType|JEntryType type);
switch (type)
case (is JSimpleType) { return simpleTypeToCeylon(type); }
case (is JOptionalType) { return optionalTypeToCeylon(type); }
case (is JSequenceType) { return sequentialTypeToCeylon(type); }
case (is JTupleType) { return tupleTypeToCeylon(type); }
case (is JIterableType) { return iterableTypeToCeylon(type); }
case (is JUnionType) { return unionTypeToCeylon(type); }
case (is JIntersectionType) { return intersectionTypeToCeylon(type); }
case (is JFunctionType) { return callableTypeToCeylon(type); }
case (is JGroupedType) { return groupedTypeToCeylon(type); }
case (is JEntryType) { return entryTypeToCeylon(type); }
}
"Compiles the given [[code]] for a Type
into a [[Type]] using the Ceylon compiler
(more specifically, the rule for a `type`)."
shared Type? compileType(String code) {
if (exists jType = createParser(code).type()) {
return typeToCeylon(jType);
} else {
return null;
}
}