Searched refs:iomsg (Results 1 - 19 of 19) sorted by relevance

/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/
H A Diomsg_2.f905 open(1, iomsg=666) ! { dg-error "IOMSG must be" }
6 open(1, iomsg='sgk') ! { dg-error "IOMSG must be" }
7 open(1, iomsg=i) ! { dg-error "IOMSG must be" }
8 close(1, iomsg=666) ! { dg-error "IOMSG must be" }
9 close(1, iomsg='sgk') ! { dg-error "IOMSG must be" }
10 close(1, iomsg=i) ! { dg-error "IOMSG must be" }
17 write(1, *, iomsg='sgk') x ! { dg-error "IOMSG must be" }
18 write(1, *, iomsg=i) x ! { dg-error "IOMSG must be" }
19 read(1, *, iomsg='sgk') x ! { dg-error "IOMSG must be" }
20 read(1, *, iomsg
[all...]
H A Diomsg_1.f902 ! Test implementation of the iomsg tag.
6 ! Test that iomsg is left unchanged with no error
8 open(10, status='scratch', iomsg=ch, iostat=i)
11 ! Test iomsg with data transfer statement
12 read(10,'(I2)', iomsg=ch, end=100) k
17 ! Test iomsg with open
18 open (-3, err=200, iomsg=ch)
24 ! Test iomsg with close
25 close(23,status="no_idea", err=500, iomsg=ch) ! { dg-warning "STATUS specifier in CLOSE statement.*has invalid value" }
H A Ddirect_io_7.f9012 backspace (95,iostat=ios,iomsg=msg)
18 endfile (95,iostat=ios,iomsg=msg)
25 rewind (95,iostat=ios,iomsg=msg)
H A Dfmt_error_10.f11 write (line,str,iostat=istat, iomsg=msg) 1.0d0, 1.234
15 write (line,'(1pd24.15e6)',iostat=istat, iomsg=msg) 1.0d0, 1.234 ! { dg-warning "Period required" }
20 write (line,str,iostat=istat, iomsg=msg) 1.0d0
22 read (*,str,iostat=istat, iomsg=msg) x
H A Diostat_4.f906 write (2_8*int(huge(0_4),kind=8)+9_8, iostat=i, iomsg=str) 555
H A Dstreamio_13.f9012 backspace (2003,iostat=ios,iomsg=msg)
H A Dunf_short_record_1.f9011 read (10, err=20, iomsg=msg) a
H A Darrayio_15.f906 character(len=512) :: iomsg variable in program:read_internal
H A Dpr59700.f9019 read(fd, *, err=10, iomsg=msg) i1, i2, i3, i4
23 read(fd, *, err=20, iomsg=msg) x1, x2, x3, x4
27 read(fd, *, err=30, iomsg=msg) i1, x2, x1, a
30 read(fd, *, err=31, iomsg=msg) i1, x2, a, x1
37 read(fd, *, err=40, iomsg=msg) c1, c2
H A Dfmt_error_9.f11 write (line,str,iostat=istat, iomsg=msg) 1.0d0, 1.234
16 write (line,str,iostat=istat, iomsg=msg) 1.0d0
18 read (*,str,iostat=istat, iomsg=msg) x
H A Dopen_errors.f9017 open(77,file=n,status="new", iomsg=msg, iostat=i)
23 open(77,file=n,status="old", iomsg=msg, iostat=i)
27 open(77,file="./", iomsg=msg, iostat=i)
35 open(77,file=n, iomsg=msg, iostat=i, action="write")
41 open(77,file=n, iomsg=msg, iostat=i, action="read")
H A Dnamelist_59.f9023 read(lines,nml=cmd,iostat=ios,iomsg=message)
H A Dunf_read_corrupted_1.f9022 read (10, iostat=ios, iomsg=msg) i1, i2
H A Dread_no_eor.f9028 read (unit,"(a)",advance="no",iostat=ios3, iomsg=themessage) buffer
42 read (unit,"(a)",advance="no",iostat=ios3, iomsg=themessage) buffer
H A Dnamelist_40.f9042 read (10, nml = mynml, iostat=ierror, iomsg=errmessage)
H A Dnamelist_47.f9040 read (10, nml = mynml, iostat=ierror, iomsg=errmessage)
/haiku-buildtools/gcc/gcc/fortran/
H A Dtrans-io.c1048 if (p->iomsg)
1050 p->iomsg);
1160 if (p->iomsg)
1162 p->iomsg);
1215 if (p->iomsg)
1217 p->iomsg);
1302 if (p->iomsg)
1304 p->iomsg);
1493 if (p->iomsg)
1495 p->iomsg);
[all...]
H A Dgfortran.h2224 *blank, *position, *action, *delim, *pad, *iostat, *iomsg, *convert, member in struct:__anon130
2233 gfc_expr *unit, *status, *iostat, *iomsg; member in struct:__anon131
2241 gfc_expr *unit, *iostat, *iomsg; member in struct:__anon132
2252 *write, *readwrite, *delim, *pad, *iolength, *iomsg, *convert, *strm_pos, member in struct:__anon133
2264 gfc_expr *unit, *iostat, *iomsg, *id; member in struct:__anon134
2272 gfc_expr *io_unit, *format_expr, *rec, *advance, *iostat, *size, *iomsg, member in struct:__anon135
H A Dfrontend-passes.c2187 WALK_SUBEXPR (co->ext.open->iomsg);
2202 WALK_SUBEXPR (co->ext.close->iomsg);
2211 WALK_SUBEXPR (co->ext.filepos->iomsg);
2217 WALK_SUBEXPR (co->ext.inquire->iomsg);
2256 WALK_SUBEXPR (co->ext.wait->iomsg);
2268 WALK_SUBEXPR (co->ext.dt->iomsg);

Completed in 147 milliseconds