@specs-feup/metafor
Version:
A Fortran source-to-source compiler written in Typescript
33 lines • 1.64 kB
JavaScript
import { unwrapJoinPoint, wrapJoinPoint } from "@specs-feup/lara/api/LaraJoinPoint.js";
import FortranJavaTypes from "./FortranJavaTypes.js";
import { flattenArgsArray } from "@specs-feup/lara/api/lara/core/LaraCore.js";
export default class FortranJoinPoints {
static ompLoopConstruct(loop, clauses) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.ompLoopConstruct(unwrapJoinPoint(loop), flattenArgsArray(clauses).map(unwrapJoinPoint)));
}
static emptyOmpLoopConstruct() {
return wrapJoinPoint(FortranJavaTypes.AstFactory.emptyOmpLoopConstruct());
}
static ompPrivateClause(dataRefs) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.ompPrivateClause(flattenArgsArray(dataRefs).map(unwrapJoinPoint)));
}
static dataRef(name) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.dataRef(name));
}
static useStatement(moduleName) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.useStatement(moduleName));
}
static ompReductionClause(operator, dataRefs) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.ompReductionClause(operator, flattenArgsArray(dataRefs).map(unwrapJoinPoint)));
}
static emptyOmpBlockConstruct() {
return wrapJoinPoint(FortranJavaTypes.AstFactory.emptyOmpBlockConstruct());
}
static execution(stmts) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.execution(flattenArgsArray(stmts).map(unwrapJoinPoint)));
}
static ompOrderedClause(value) {
return wrapJoinPoint(FortranJavaTypes.AstFactory.ompOrderedClause(value));
}
}
//# sourceMappingURL=FortranJoinPoints.js.map