diff options
author | Hans-Peter Nilsson <hp@bitrange.com> | 2002-04-03 01:45:43 +0000 |
---|---|---|
committer | Hans-Peter Nilsson <hp@bitrange.com> | 2002-04-03 01:45:43 +0000 |
commit | 43e71a77b43176953a14c12a4f946515cf90da7f (patch) | |
tree | 5cff8916cd40169149d043bf89bdea3d9deadad6 /gcc/testsuite/g77.f-torture | |
parent | c59c3e37676f61a28e5cc4153ff4b62ec829cbb0 (diff) |
* g77.dg/f77-edit-i-in.f: xfail for mmix-knuth-mmixware.
* g77.f-torture/execute/io0.x, g77.f-torture/execute/io1.x,
g77.f-torture/execute/20001201.x,
g77.f-torture/execute/u77-test.x: New files.
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@51771 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/g77.f-torture')
-rw-r--r-- | gcc/testsuite/g77.f-torture/execute/20001201.x | 8 | ||||
-rw-r--r-- | gcc/testsuite/g77.f-torture/execute/io0.x | 8 | ||||
-rw-r--r-- | gcc/testsuite/g77.f-torture/execute/io1.x | 8 | ||||
-rw-r--r-- | gcc/testsuite/g77.f-torture/execute/u77-test.x | 8 |
4 files changed, 32 insertions, 0 deletions
diff --git a/gcc/testsuite/g77.f-torture/execute/20001201.x b/gcc/testsuite/g77.f-torture/execute/20001201.x new file mode 100644 index 00000000000..027dcb5ccae --- /dev/null +++ b/gcc/testsuite/g77.f-torture/execute/20001201.x @@ -0,0 +1,8 @@ +# Scratch files aren't implemented for mmixware +# (_stat is a stub and files can't be deleted). + +if { [istarget "mmix-knuth-mmixware"] } { + set torture_execute_xfail "mmix-knuth-mmixware" +} + +return 0 diff --git a/gcc/testsuite/g77.f-torture/execute/io0.x b/gcc/testsuite/g77.f-torture/execute/io0.x new file mode 100644 index 00000000000..027dcb5ccae --- /dev/null +++ b/gcc/testsuite/g77.f-torture/execute/io0.x @@ -0,0 +1,8 @@ +# Scratch files aren't implemented for mmixware +# (_stat is a stub and files can't be deleted). + +if { [istarget "mmix-knuth-mmixware"] } { + set torture_execute_xfail "mmix-knuth-mmixware" +} + +return 0 diff --git a/gcc/testsuite/g77.f-torture/execute/io1.x b/gcc/testsuite/g77.f-torture/execute/io1.x new file mode 100644 index 00000000000..027dcb5ccae --- /dev/null +++ b/gcc/testsuite/g77.f-torture/execute/io1.x @@ -0,0 +1,8 @@ +# Scratch files aren't implemented for mmixware +# (_stat is a stub and files can't be deleted). + +if { [istarget "mmix-knuth-mmixware"] } { + set torture_execute_xfail "mmix-knuth-mmixware" +} + +return 0 diff --git a/gcc/testsuite/g77.f-torture/execute/u77-test.x b/gcc/testsuite/g77.f-torture/execute/u77-test.x new file mode 100644 index 00000000000..ff4c1e29f0b --- /dev/null +++ b/gcc/testsuite/g77.f-torture/execute/u77-test.x @@ -0,0 +1,8 @@ +# Various intrinsics not implemented and not implementable; will fail at +# link time. + +if { [istarget "mmix-knuth-mmixware"] } { + set torture_compile_xfail "mmix-knuth-mmixware" +} + +return 0 |