repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge to HEAD at tree-cleanup-merge-20041024 .
[official-gcc.git]
/
gcc
/
testsuite
/
g77.f-torture
/
compile
/
980729-0.f
blob
07789441d41241e5e6928cdb4b66972688796a7a
1
c Got ICE on Alpha only with -mieee (currently not tested).
2
c Fixed by rth 1998-07-30 alpha.md change.
3
subroutine
a
(
b
,
c
)
4
b
=
max
(
b
,
c
)
5
end