diff --git a/flang/lib/Frontend/FrontendActions.cpp b/flang/lib/Frontend/FrontendActions.cpp --- a/flang/lib/Frontend/FrontendActions.cpp +++ b/flang/lib/Frontend/FrontendActions.cpp @@ -90,7 +90,8 @@ // Otherwise, generate an MLIR module from the input Fortran source assert(getCurrentInput().getKind().getLanguage() == Language::Fortran && "Invalid input type - expecting a Fortran file"); - bool res = runPrescan() && runParse() && runSemanticChecks(); + bool res = runPrescan() && runParse() && runSemanticChecks() && + generateRtTypeTables(); if (!res) return res; diff --git a/flang/test/Lower/derived-type-descriptor.f90 b/flang/test/Lower/derived-type-descriptor.f90 --- a/flang/test/Lower/derived-type-descriptor.f90 +++ b/flang/test/Lower/derived-type-descriptor.f90 @@ -1,5 +1,6 @@ ! Test lowering of derived type descriptors builtin data ! RUN: bbc -emit-fir %s -o - | FileCheck %s +! RUN: %flang_fc1 -emit-fir %s -o - | FileCheck %s subroutine foo() real, save, target :: init_values(10, 10)