else if (resultType.isInteger(64))
func = fir::runtime::getRuntimeFunc<ForcedExponent16_8>(loc, builder);
} else
- fir::emitFatalError(loc, "unsupported REAL KIND in EXPONENT");
+ fir::emitFatalError(loc, "unsupported REAL kind in EXPONENT");
auto funcTy = func.getFunctionType();
llvm::SmallVector<mlir::Value> args = {
else if (fltTy.isF128())
func = fir::runtime::getRuntimeFunc<ForcedFraction16>(loc, builder);
else
- fir::emitFatalError(loc, "unsupported real kind in FRACTION");
+ fir::emitFatalError(loc, "unsupported REAL kind in FRACTION");
auto funcTy = func.getFunctionType();
llvm::SmallVector<mlir::Value> args = {
else if (fltTy.isF128())
func = fir::runtime::getRuntimeFunc<ForcedRRSpacing16>(loc, builder);
else
- fir::emitFatalError(loc, "unsupported real kind in RRSPACING");
+ fir::emitFatalError(loc, "unsupported REAL kind in RRSPACING");
auto funcTy = func.getFunctionType();
llvm::SmallVector<mlir::Value> args = {
else if (fltTy.isF128())
func = fir::runtime::getRuntimeFunc<ForcedSetExponent16>(loc, builder);
else
- fir::emitFatalError(loc, "unsupported real kind in FRACTION");
+ fir::emitFatalError(loc, "unsupported REAL kind in FRACTION");
auto funcTy = func.getFunctionType();
auto args = fir::runtime::createArguments(builder, loc, funcTy, x, i);
else if (fltTy.isF128())
func = fir::runtime::getRuntimeFunc<ForcedSpacing16>(loc, builder);
else
- fir::emitFatalError(loc, "unsupported real kind in SPACING");
+ fir::emitFatalError(loc, "unsupported REAL kind in SPACING");
auto funcTy = func.getFunctionType();
llvm::SmallVector<mlir::Value> args = {