Do not do src->dest copy if register would not be allocated a normal register
[official-gcc.git] / gcc / f / str-io.fin
blob4124da6e6147cf16c666010db8cb31b937065a07
2    Copyright (C) 1995 Free Software Foundation, Inc.
3    Contributed by James Craig Burley (burley@gnu.org).
5 This file is part of GNU Fortran.
7 GNU Fortran is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
12 GNU Fortran is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Fortran; see the file COPYING.  If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.
24 FFESTR_genio // // ffestrGenio ffestr_genio 1 0
25 Advance ADVANCE
26 Disp DISP
27 Dispose DISPOSE
28 End END
29 EoR EOR
30 Err ERR
31 Fmt FMT
32 IOStat IOSTAT
33 Key KEY
34 KeyEQ KEYEQ
35 KeyGE KEYGE
36 KeyGT KEYGT
37 KeyID KEYID
38 Nml NML
39 Nulls NULLS
40 Rec REC
41 Size SIZE
42 Status STATUS
43 Unit UNIT