projects
/
gcc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9dd07f8
)
Duplicated 980310-2.f.
author
Dave Love
<fx@gcc.gnu.org>
Thu, 14 May 1998 02:32:14 +0000
(
02:32
+0000)
committer
Dave Love
<fx@gcc.gnu.org>
Thu, 14 May 1998 02:32:14 +0000
(
02:32
+0000)
From-SVN: r19737
gcc/testsuite/g77.f-torture/compile/971014-1.f
[deleted file]
patch
|
blob
|
history
diff --git
a/gcc/testsuite/g77.f-torture/compile/971014-1.f
b/gcc/testsuite/g77.f-torture/compile/971014-1.f
deleted file mode 100644
(file)
index
1d95d52
..0000000
--- a/
gcc/testsuite/g77.f-torture/compile/971014-1.f
+++ /dev/null
@@
-1,12
+0,0 @@
-C
-C RND - Return a random integer mod n
-C
- INTEGER FUNCTION RND (N)
- IMPLICIT INTEGER (A-Z)
- REAL RAND
- COMMON /SEED/ RNSEED
-
- RND = RAND(RNSEED)*FLOAT(N)
- RETURN
-
- END