diff --git a/flang/lib/Lower/OpenACC.cpp b/flang/lib/Lower/OpenACC.cpp index 84ce4cde94200..9670cc01b593b 100644 --- a/flang/lib/Lower/OpenACC.cpp +++ b/flang/lib/Lower/OpenACC.cpp @@ -2981,9 +2981,8 @@ genACC(Fortran::lower::AbstractConverter &converter, std::stringstream routineOpName; routineOpName << accRoutinePrefix.str() << routineCounter++; auto routineOp = modBuilder.create( - loc, routineOpName.str(), funcName, mlir::StringAttr{}, mlir::UnitAttr{}, - mlir::UnitAttr{}, mlir::UnitAttr{}, mlir::UnitAttr{}, mlir::UnitAttr{}, - mlir::UnitAttr{}, mlir::IntegerAttr{}); + loc, routineOpName.str(), funcName, mlir::StringAttr{}, false, false, + false, false, false, false, mlir::IntegerAttr{}); for (const Fortran::parser::AccClause &clause : clauses.v) { if (std::get_if(&clause.u)) { diff --git a/mlir/include/mlir/Dialect/OpenACC/OpenACCOps.td b/mlir/include/mlir/Dialect/OpenACC/OpenACCOps.td index ce1b4e29cd51b..60156cc334c72 100644 --- a/mlir/include/mlir/Dialect/OpenACC/OpenACCOps.td +++ b/mlir/include/mlir/Dialect/OpenACC/OpenACCOps.td @@ -1563,12 +1563,12 @@ def OpenACC_RoutineOp : OpenACC_Op<"routine", [IsolatedFromAbove]> { let arguments = (ins SymbolNameAttr:$sym_name, SymbolNameAttr:$func_name, OptionalAttr:$bind_name, - OptionalAttr:$gang, - OptionalAttr:$worker, - OptionalAttr:$vector, - OptionalAttr:$seq, - OptionalAttr:$nohost, - OptionalAttr:$implicit, + UnitAttr:$gang, + UnitAttr:$worker, + UnitAttr:$vector, + UnitAttr:$seq, + UnitAttr:$nohost, + UnitAttr:$implicit, OptionalAttr:$gangDim); let extraClassDeclaration = [{