[llvm-branch-commits] [flang] cea0ff3 - [flang] Temp Driver - pass the flag to change the default integer kind through to F18_FC

[Hans Wennborg via llvm-branch-commits]

Author: AlexisPerry
Date: 2020-08-18T11:58:19+02:00
New Revision: cea0ff34238d164a5d667898bbedf18f0d3ad11e

URL: https://github.com/llvm/llvm-project/commit/cea0ff34238d164a5d667898bbedf18f0d3ad11e
DIFF: https://github.com/llvm/llvm-project/commit/cea0ff34238d164a5d667898bbedf18f0d3ad11e.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

(cherry picked from commit 4a4cafabc9067fced5890a245b03ef5897ad988b)

Added: 
    

Modified: 
    flang/tools/f18/f18.cpp

Removed: 
    


################################################################################
diff  --git a/flang/tools/f18/f18.cpp b/flang/tools/f18/f18.cpp
index 574a37074e52..884b21322b73 100644
--- a/flang/tools/f18/f18.cpp
+++ b/flang/tools/f18/f18.cpp
@@ -544,6 +544,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") {