@@ -393,7 +393,7 @@ Function *CGIntrinsicsOpenMP::createOutlinedFunction(
393
393
<< *OutlinedFn << " === End of Dump OutlinedFn\n " );
394
394
395
395
if (verifyFunction (*OutlinedFn, &errs ()))
396
- report_fatal_error (" Verification of OutlinedFn failed!" );
396
+ FATAL_ERROR (" Verification of OutlinedFn failed!" );
397
397
398
398
CapturedVars.append (CapturedShared);
399
399
CapturedVars.append (CapturedFirstprivate);
@@ -576,7 +576,7 @@ void CGIntrinsicsOpenMP::emitOMPParallelHostRuntime(
576
576
<< *Fn << " === End of Dump OuterFn\n " );
577
577
578
578
if (verifyFunction (*Fn, &errs ()))
579
- report_fatal_error (" Verification of OuterFn failed!" );
579
+ FATAL_ERROR (" Verification of OuterFn failed!" );
580
580
}
581
581
582
582
#if 0
@@ -827,7 +827,7 @@ void CGIntrinsicsOpenMP::emitOMPParallelDeviceRuntime(
827
827
OMPBuilder.Builder .CreateRetVoid ();
828
828
829
829
if (verifyFunction (*OutlinedWrapperFn, &errs ()))
830
- report_fatal_error (" Verification of OutlinedWrapperFn failed!" );
830
+ FATAL_ERROR (" Verification of OutlinedWrapperFn failed!" );
831
831
832
832
DEBUG_ENABLE (dbgs () << " === Dump OutlinedWrapper\n "
833
833
<< *OutlinedWrapperFn
@@ -985,7 +985,7 @@ void CGIntrinsicsOpenMP::emitOMPParallelDeviceRuntime(
985
985
<< *Fn << " === End of Dump OuterFn\n " );
986
986
987
987
if (verifyFunction (*Fn, &errs ()))
988
- report_fatal_error (" Verification of OuterFn failed!" );
988
+ FATAL_ERROR (" Verification of OuterFn failed!" );
989
989
}
990
990
991
991
FunctionCallee CGIntrinsicsOpenMP::getKmpcForStaticInit (Type *Ty) {
@@ -1013,7 +1013,7 @@ FunctionCallee CGIntrinsicsOpenMP::getKmpcDistributeStaticInit(Type *Ty) {
1013
1013
return OMPBuilder.getOrCreateRuntimeFunction (
1014
1014
M, OMPRTL___kmpc_distribute_static_init_8u);
1015
1015
1016
- report_fatal_error (" unknown OpenMP loop iterator bitwidth" );
1016
+ FATAL_ERROR (" unknown OpenMP loop iterator bitwidth" );
1017
1017
}
1018
1018
1019
1019
void CGIntrinsicsOpenMP::emitOMPFor (DSAValueMapTy &DSAValueMap,
@@ -1125,7 +1125,7 @@ void CGIntrinsicsOpenMP::emitOMPFor(DSAValueMapTy &DSAValueMap,
1125
1125
OMPBuilder.Builder , OMPBuilder.Builder .saveIP (), Orig,
1126
1126
ReductionInfos);
1127
1127
} else
1128
- report_fatal_error (" Unsupported privatization" );
1128
+ FATAL_ERROR (" Unsupported privatization" );
1129
1129
1130
1130
assert (ReplacementValue && " Expected non-null ReplacementValue" );
1131
1131
@@ -1264,7 +1264,7 @@ void CGIntrinsicsOpenMP::emitOMPFor(DSAValueMapTy &DSAValueMap,
1264
1264
}
1265
1265
1266
1266
if (verifyFunction (*PreHeader->getParent (), &errs ()))
1267
- report_fatal_error (" Verification of omp for lowering failed!" );
1267
+ FATAL_ERROR (" Verification of omp for lowering failed!" );
1268
1268
}
1269
1269
1270
1270
void CGIntrinsicsOpenMP::emitOMPTask (DSAValueMapTy &DSAValueMap, Function *Fn,
@@ -1306,7 +1306,7 @@ void CGIntrinsicsOpenMP::emitOMPTask(DSAValueMapTy &DSAValueMap, Function *Fn,
1306
1306
// Store a copy of the value, thus get the pointer element type.
1307
1307
PrivatesTy.push_back (OriginalValue->getType ()->getPointerElementType ());
1308
1308
} else
1309
- report_fatal_error (" Unknown DSA type" );
1309
+ FATAL_ERROR (" Unknown DSA type" );
1310
1310
}
1311
1311
1312
1312
StructType *KmpSharedsTTy = nullptr ;
@@ -1526,7 +1526,7 @@ void CGIntrinsicsOpenMP::emitOMPTask(DSAValueMapTy &DSAValueMap, Function *Fn,
1526
1526
ReplacementValue = FirstprivateGEP;
1527
1527
++PrivatesGEPIdx;
1528
1528
} else
1529
- report_fatal_error (" Unknown DSA type" );
1529
+ FATAL_ERROR (" Unknown DSA type" );
1530
1530
1531
1531
assert (ReplacementValue && " Expected non-null ReplacementValue" );
1532
1532
SmallVector<User *, 8 > Users (OriginalValue->users ());
@@ -1669,7 +1669,7 @@ void CGIntrinsicsOpenMP::emitOMPOffloadingMappings(
1669
1669
// do nothing
1670
1670
break ;
1671
1671
default :
1672
- report_fatal_error (" Unknown mapping type" );
1672
+ FATAL_ERROR (" Unknown mapping type" );
1673
1673
}
1674
1674
1675
1675
return MapType;
@@ -1769,7 +1769,7 @@ void CGIntrinsicsOpenMP::emitOMPOffloadingMappings(
1769
1769
break ;
1770
1770
}
1771
1771
default :
1772
- report_fatal_error (" Unknown mapping type" );
1772
+ FATAL_ERROR (" Unknown mapping type" );
1773
1773
}
1774
1774
}
1775
1775
@@ -1885,7 +1885,7 @@ void CGIntrinsicsOpenMP::emitOMPCritical(Function *Fn, BasicBlock *BBEntry,
1885
1885
BodyGenCallbackTy BodyGenCB,
1886
1886
FinalizeCallbackTy FiniCB) {
1887
1887
if (isOpenMPDeviceRuntime ())
1888
- report_fatal_error (" Critical regions are not (yet) implemented on device" );
1888
+ FATAL_ERROR (" Critical regions are not (yet) implemented on device" );
1889
1889
1890
1890
const DebugLoc DL = BBEntry->getTerminator ()->getDebugLoc ();
1891
1891
BBEntry->getTerminator ()->eraseFromParent ();
@@ -2390,7 +2390,7 @@ void CGIntrinsicsOpenMP::emitOMPTeamsDeviceRuntime(
2390
2390
<< *Fn << " === End of Dump OuterFn\n " );
2391
2391
2392
2392
if (verifyFunction (*Fn, &errs ()))
2393
- report_fatal_error (" Verification of OuterFn failed!" );
2393
+ FATAL_ERROR (" Verification of OuterFn failed!" );
2394
2394
}
2395
2395
2396
2396
void CGIntrinsicsOpenMP::emitOMPTeams (DSAValueMapTy &DSAValueMap,
@@ -2490,7 +2490,7 @@ void CGIntrinsicsOpenMP::emitOMPTeamsHostRuntime(
2490
2490
<< *Fn << " === End of Dump OuterFn\n " );
2491
2491
2492
2492
if (verifyFunction (*Fn, &errs ()))
2493
- report_fatal_error (" Verification of OuterFn failed!" );
2493
+ FATAL_ERROR (" Verification of OuterFn failed!" );
2494
2494
}
2495
2495
2496
2496
void CGIntrinsicsOpenMP::emitOMPTargetEnterData (
@@ -2698,7 +2698,7 @@ void CGIntrinsicsOpenMP::emitOMPDistribute(DSAValueMapTy &DSAValueMap,
2698
2698
} else
2699
2699
OMPBuilder.Builder .CreateStore (V, ReplacementValue);
2700
2700
} else
2701
- report_fatal_error (" Unsupported privatization" );
2701
+ FATAL_ERROR (" Unsupported privatization" );
2702
2702
2703
2703
assert (ReplacementValue && " Expected non-null ReplacementValue" );
2704
2704
@@ -3067,7 +3067,7 @@ void CGIntrinsicsOpenMP::emitOMPDistributeParallelFor(
3067
3067
DSAValueMap.erase (PUpperBound);
3068
3068
3069
3069
if (verifyFunction (*Fn, &errs ()))
3070
- report_fatal_error (
3070
+ FATAL_ERROR (
3071
3071
" Verification of DistributeParallelFor lowering failed!" );
3072
3072
3073
3073
DEBUG_ENABLE (dbgs () << " === Dump DistributeParallelFor\n "
@@ -3178,7 +3178,7 @@ Value *CGReduction::emitOperation<DSA_REDUCTION_ADD>(IRBuilderBase &IRB,
3178
3178
else if (VTy->isFloatTy () || VTy->isDoubleTy ())
3179
3179
return IRB.CreateFAdd (LHS, RHS, " red.add" );
3180
3180
else
3181
- report_fatal_error (" Unsupported type for reduction operation" );
3181
+ FATAL_ERROR (" Unsupported type for reduction operation" );
3182
3182
}
3183
3183
3184
3184
// OpenMP 5.1, 2.21.5, sub is the same as add.
@@ -3197,7 +3197,7 @@ Value *CGReduction::emitOperation<DSA_REDUCTION_MUL>(IRBuilderBase &IRB,
3197
3197
else if (VTy->isFloatTy () || VTy->isDoubleTy ())
3198
3198
return IRB.CreateFMul (LHS, RHS, " red.mul" );
3199
3199
else
3200
- report_fatal_error (" Unsupported type for reduction operation" );
3200
+ FATAL_ERROR (" Unsupported type for reduction operation" );
3201
3201
}
3202
3202
3203
3203
template <>
0 commit comments