X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Ftests%2FArray%2Farr007%2FMain.hs;fp=ghc%2Flib%2Ftests%2FArray%2Farr007%2FMain.hs;h=0000000000000000000000000000000000000000;hb=7f0f325c2119165b48edfcf31eb79639bcbd2efa;hp=e3e4ba0f7bb0d231968403068596146c0718a469;hpb=9b4229529c602b06eb4bad1e0da39d8b9dc1dc75;p=ghc-hetmet.git diff --git a/ghc/lib/tests/Array/arr007/Main.hs b/ghc/lib/tests/Array/arr007/Main.hs deleted file mode 100644 index e3e4ba0..0000000 --- a/ghc/lib/tests/Array/arr007/Main.hs +++ /dev/null @@ -1,11 +0,0 @@ --- Array - accessing empty arrays --- --- empty arrays are legal, but indexing them is undefined! --- -import Array - -main = - let - a1 = array (1,0) [(1,'a')] - in - print (a1!0)