[flang] delete two obsolete tests that somehow got committed
authorpeter klausler <pklausler@nvidia.com>
Wed, 26 Jun 2019 23:34:41 +0000 (16:34 -0700)
committerpeter klausler <pklausler@nvidia.com>
Fri, 28 Jun 2019 16:20:59 +0000 (09:20 -0700)
Original-commit: flang-compiler/f18@8b6a49416ce5557863035fd3eddfb27bb8b0e6e9
Reviewed-on: https://github.com/flang-compiler/f18/pull/531
Tree-same-pre-rewrite: false

flang/test/jean-crash.f90 [deleted file]
flang/test/semantics/pdt99.f90 [deleted file]

diff --git a/flang/test/jean-crash.f90 b/flang/test/jean-crash.f90
deleted file mode 100644 (file)
index 3b81b1d..0000000
+++ /dev/null
@@ -1,3 +0,0 @@
-integer :: j(2)
-j = abs([1,2])(1:2)
-end
diff --git a/flang/test/semantics/pdt99.f90 b/flang/test/semantics/pdt99.f90
deleted file mode 100644 (file)
index 29dba7a..0000000
+++ /dev/null
@@ -1,81 +0,0 @@
-! Copyright (c) 2018, NVIDIA CORPORATION.  All rights reserved.
-!
-! Licensed under the Apache License, Version 2.0 (the "License");
-! you may not use this file except in compliance with the License.
-! You may obtain a copy of the License at
-!
-!     http://www.apache.org/licenses/LICENSE-2.0
-!
-! Unless required by applicable law or agreed to in writing, software
-! distributed under the License is distributed on an "AS IS" BASIS,
-! WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-! See the License for the specific language governing permissions and
-! limitations under the License.
-
-module m
-  type :: pdt(k1,k2,k4,k8,k16)
-    integer(1), kind :: k1
-    integer(2), kind :: k2
-    integer(4), kind :: k4
-    integer(8), kind :: k8
-    integer(16), kind :: k16
-  end type pdt
- contains
-  subroutine s1
-    type(pdt(k16=116,k8=18,k4=14,k2=12,k1=11)) :: x1
-    print *, x1%k1
-    print *, x1%k2
-    print *, x1%k4
-    print *, x1%k8
-    print *, x1%k16
-  end subroutine s1
-  subroutine s2
-    integer(1) :: j1, ja1(1)
-    integer(2) :: j2, ja2(1)
-    integer(4) :: j4, ja4(1)
-    integer(8) :: j8, ja8(1)
-    integer(16) :: j16, ja16(1)
-    real(2) :: a2, aa2(1)
-    real(4) :: a4, aa4(1)
-    real(8) :: a8, aa8(1)
-    real(10) :: a10, aa10(1)
-    real(16) :: a16, aa16(1)
-    complex(2) :: z2, za2(1)
-    complex(4) :: z4, za4(1)
-    complex(8) :: z8, za8(1)
-    complex(10) :: z10, za10(1)
-    complex(16) :: z16, za16(1)
-    character(1,11) :: ch1, cha1(1)
-    character(2,12) :: ch2, cha2(1)
-    character(4,14) :: ch4, cha4(1)
-    logical(1) :: p1, pa1(1)
-    logical(2) :: p2, pa2(1)
-    logical(4) :: p4, pa4(1)
-    logical(8) :: p8, pa8(1)
-    print *, j1%kind, ja1%kind, ja1(1)%kind
-    print *, j2%kind, ja2%kind, ja2(1)%kind
-    print *, j4%kind, ja4%kind, ja4(1)%kind
-    print *, j8%kind, ja8%kind, ja8(1)%kind
-    print *, j16%kind, ja16%kind, ja16(1)%kind
-    print *, a2%kind, aa2%kind, aa2(1)%kind
-    print *, a4%kind, aa4%kind, aa4(1)%kind
-    print *, a8%kind, aa8%kind, aa8(1)%kind
-    print *, a10%kind, aa10%kind, aa10(1)%kind
-    print *, a16%kind, aa16%kind, aa16(1)%kind
-    print *, z2%kind, za2%kind, za2(1)%kind
-    print *, z4%kind, za4%kind, za4(1)%kind
-    print *, z8%kind, za8%kind, za8(1)%kind
-    print *, z10%kind, za10%kind, za10(1)%kind
-    print *, z16%kind, za16%kind, za16(1)%kind
-    print *, ch1%kind, cha1%kind, cha1(1)%kind
-    print *, ch2%kind, cha2%kind, cha2(1)%kind
-    print *, ch4%kind, cha4%kind, cha4(1)%kind
-    print *, ch1%len, cha1%len, cha1(1)%len
-    print *, ch2%len, cha2%len, cha2(1)%len
-    print *, ch4%len, cha4%len, cha4(1)%len
-    print *, p1%kind, pa1%kind, pa1(1)%kind
-    print *, p2%kind, pa2%kind, pa2(1)%kind
-    print *, p4%kind, pa4%kind, pa4(1)%kind
-    print *, p8%kind, pa8%kind, pa8(1)%kind
-  end subroutine s2
-end module