[flang] [OpenMP] fix type for `Final` clause

The type should be `ScalarLogicalExpr`.

Original-commit: flang-compiler/f18@97e4282d7c
This commit is contained in:
Jinxin Yang 2019-09-04 17:32:01 -07:00 committed by Jinxin (Brian) Yang
parent 658cf65249
commit 77ed1df8a7
2 changed files with 3 additions and 3 deletions

View File

@ -181,8 +181,8 @@ TYPE_PARSER("ALIGNED" >>
parenthesized(scalarIntExpr))) ||
"DIST_SCHEDULE" >> construct<OmpClause>(construct<OmpClause::DistSchedule>(
parenthesized("STATIC ," >> scalarIntExpr))) ||
"FINAL" >> construct<OmpClause>(
construct<OmpClause::Final>(parenthesized(scalarIntExpr))) ||
"FINAL" >> construct<OmpClause>(construct<OmpClause::Final>(
parenthesized(scalarLogicalExpr))) ||
"FIRSTPRIVATE" >> construct<OmpClause>(construct<OmpClause::Firstprivate>(
parenthesized(Parser<OmpObjectList>{}))) ||
"FROM" >> construct<OmpClause>(construct<OmpClause::From>(

View File

@ -3442,7 +3442,7 @@ struct OmpClause {
WRAPPER_CLASS(Copyprivate, OmpObjectList);
WRAPPER_CLASS(Device, ScalarIntExpr);
WRAPPER_CLASS(DistSchedule, ScalarIntExpr);
WRAPPER_CLASS(Final, ScalarIntExpr);
WRAPPER_CLASS(Final, ScalarLogicalExpr);
WRAPPER_CLASS(Firstprivate, OmpObjectList);
WRAPPER_CLASS(From, OmpObjectList);
WRAPPER_CLASS(Grainsize, ScalarIntExpr);