Skip to content

Commit 4a4cafa

Browse files
AlexisPerrytskeith
authored andcommitted
[flang] Temp Driver - pass the flag to change the default integer kind through to F18_FC
fixes BUG 46307 Differential Revision: https://reviews.llvm.org/D84266
1 parent dbeb184 commit 4a4cafa

File tree

1 file changed

+5
-0
lines changed

1 file changed

+5
-0
lines changed

flang/tools/f18/f18.cpp

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -545,6 +545,11 @@ int main(int argc, char *const argv[]) {
545545
defaultKinds.set_defaultIntegerKind(8);
546546
defaultKinds.set_subscriptIntegerKind(8);
547547
defaultKinds.set_sizeIntegerKind(8);
548+
if (isPGF90) {
549+
driver.F18_FCArgs.push_back("-i8");
550+
} else {
551+
driver.F18_FCArgs.push_back("-fdefault-integer-8");
552+
}
548553
} else if (arg == "-Mlargearray") {
549554
} else if (arg == "-Mnolargearray") {
550555
} else if (arg == "-flarge-sizes") {

0 commit comments

Comments
 (0)