aboutsummaryrefslogtreecommitdiff
path: root/flang/lib/Lower/CallInterface.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'flang/lib/Lower/CallInterface.cpp')
-rw-r--r--flang/lib/Lower/CallInterface.cpp2
1 files changed, 1 insertions, 1 deletions
diff --git a/flang/lib/Lower/CallInterface.cpp b/flang/lib/Lower/CallInterface.cpp
index 75a8627..30f9858 100644
--- a/flang/lib/Lower/CallInterface.cpp
+++ b/flang/lib/Lower/CallInterface.cpp
@@ -615,7 +615,7 @@ static void addSymbolAttribute(mlir::func::FuncOp func,
func->setAttr(fir::getFuncPureAttrName(),
mlir::UnitAttr::get(&mlirContext));
if (IsElementalProcedure(sym))
- func->setAttr(fir::getFuncElementAttrName(),
+ func->setAttr(fir::getFuncElementalAttrName(),
mlir::UnitAttr::get(&mlirContext));
if (sym.attrs().test(Fortran::semantics::Attr::RECURSIVE))
func->setAttr(fir::getFuncRecursiveAttrName(),