]> git.ipfire.org Git - thirdparty/gcc.git/commit
2003-03-22 Bud Davis <bdavis9659@comcast.net>
authortoon <toon@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 22 Mar 2003 13:01:08 +0000 (13:01 +0000)
committertoon <toon@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 22 Mar 2003 13:01:08 +0000 (13:01 +0000)
commitc758d08fbe76d030a009ae4bc28d01f94cc3c14c
tree8a407bae36a52fb2123c2e1a020e6fee6d41df06
parentbb39af721f94c2cb70ffbe80d1e173f596525561
2003-03-22  Bud Davis  <bdavis9659@comcast.net>

* com.c (ffecom_constantunion_with_type): New function.
* com.h (ffecom_constantunion_with_type): Declare.
* stc.c (ffestc_R810): Check for kind type.
* ste.c (ffeste_R810): Use ffecom_constantunion_with_type
to discern SELECT CASE variables.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@64709 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/f/ChangeLog
gcc/f/com.c
gcc/f/com.h
gcc/f/stc.c
gcc/f/ste.c
gcc/testsuite/ChangeLog
gcc/testsuite/g77.f-torture/execute/select.f [new file with mode: 0644]
gcc/testsuite/g77.f-torture/noncompile/select_no_compile.f [new file with mode: 0644]