summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--flang-rt/lib/cuda/allocatable.cpp7
-rw-r--r--flang-rt/lib/cuda/pointer.cpp7
2 files changed, 0 insertions, 14 deletions
diff --git a/flang-rt/lib/cuda/allocatable.cpp b/flang-rt/lib/cuda/allocatable.cpp
index c77819e9440d..ff1a225d66ce 100644
--- a/flang-rt/lib/cuda/allocatable.cpp
+++ b/flang-rt/lib/cuda/allocatable.cpp
@@ -44,13 +44,6 @@ int RTDEF(CUFAllocatableAllocateSync)(Descriptor &desc, int64_t *stream,
int RTDEF(CUFAllocatableAllocate)(Descriptor &desc, int64_t *stream,
bool *pinned, bool hasStat, const Descriptor *errMsg,
const char *sourceFile, int sourceLine) {
- if (desc.HasAddendum()) {
- Terminator terminator{sourceFile, sourceLine};
- // TODO: This require a bit more work to set the correct type descriptor
- // address
- terminator.Crash(
- "not yet implemented: CUDA descriptor allocation with addendum");
- }
// Perform the standard allocation.
int stat{RTNAME(AllocatableAllocate)(
desc, stream, hasStat, errMsg, sourceFile, sourceLine)};
diff --git a/flang-rt/lib/cuda/pointer.cpp b/flang-rt/lib/cuda/pointer.cpp
index 0ed2b0a2b751..d3f5cfe8e96a 100644
--- a/flang-rt/lib/cuda/pointer.cpp
+++ b/flang-rt/lib/cuda/pointer.cpp
@@ -25,13 +25,6 @@ RT_EXT_API_GROUP_BEGIN
int RTDEF(CUFPointerAllocate)(Descriptor &desc, int64_t *stream, bool *pinned,
bool hasStat, const Descriptor *errMsg, const char *sourceFile,
int sourceLine) {
- if (desc.HasAddendum()) {
- Terminator terminator{sourceFile, sourceLine};
- // TODO: This require a bit more work to set the correct type descriptor
- // address
- terminator.Crash(
- "not yet implemented: CUDA descriptor allocation with addendum");
- }
// Perform the standard allocation.
int stat{
RTNAME(PointerAllocate)(desc, hasStat, errMsg, sourceFile, sourceLine)};