Examples with FstructType claw.tatsu.xcodeml.xnode.fortran.FstructType used on opensource projects

Example 1 with FstructType

use of claw.tatsu.xcodeml.xnode.fortran.FstructType in project claw-compiler by C2SM-RCM.

the class XtypeTable method readTable.

/**
 * Read the type table.
 */
private void readTable() {
    List<Xnode> elements = children();
    for (Xnode n : elements) {
        switch(n.opcode()) {
            case F_BASIC_TYPE:
                FbasicType bt = new FbasicType(n);
                _table.put(bt.getType(), bt);
                break;
            case F_FUNCTION_TYPE:
                FfunctionType ft = new FfunctionType(n);
                _table.put(ft.getType(), ft);
                break;
            case F_STRUCT_TYPE:
                FstructType st = new FstructType(n);
                _table.put(st.getType(), st);
                break;
            default:
                break;
        }
    }
}