[flang-commits] [flang] 4a4cafa - [flang] Temp Driver - pass the flag to change the default integer kind through to F18_FC

[Tim Keith via flang-commits]

Author: AlexisPerry
Date: 2020-07-27T09:57:34-07:00
New Revision: 4a4cafabc9067fced5890a245b03ef5897ad988b

URL: https://github.com/llvm/llvm-project/commit/4a4cafabc9067fced5890a245b03ef5897ad988b
DIFF: https://github.com/llvm/llvm-project/commit/4a4cafabc9067fced5890a245b03ef5897ad988b.diff

LOG: [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

Added: 
    

Modified: 
    flang/tools/f18/f18.cpp

Removed: 
    


################################################################################
diff  --git a/flang/tools/f18/f18.cpp b/flang/tools/f18/f18.cpp
index bcafb0d53cc7..2b2eacc2e6f1 100644
--- a/flang/tools/f18/f18.cpp
+++ b/flang/tools/f18/f18.cpp
@@ -545,6 +545,11 @@ int main(int argc, char *const argv[]) {
       defaultKinds.set_defaultIntegerKind(8);
       defaultKinds.set_subscriptIntegerKind(8);
       defaultKinds.set_sizeIntegerKind(8);
+      if (isPGF90) {
+        driver.F18_FCArgs.push_back("-i8");
+      } else {
+        driver.F18_FCArgs.push_back("-fdefault-integer-8");
+      }
     } else if (arg == "-Mlargearray") {
     } else if (arg == "-Mnolargearray") {
     } else if (arg == "-flarge-sizes") {