]>
Commit | Line | Data |
---|---|---|
38d24731 RW |
1 | 2008-03-16 Ralf Wildenhues <Ralf.Wildenhues@gmx.de> |
2 | ||
3 | * aclocal.m4: Regenerate. | |
4 | * configure: Likewise. | |
5 | * Makefile.in: Likewise. | |
6 | ||
cb31c4bc FXC |
7 | 2008-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
8 | ||
9 | PR libfortran/35524 | |
10 | * intrinsics/erfc_scaled_inc.c: Only define the long double | |
11 | variant of erfc_scaled if expl is available. | |
12 | ||
2d3ca8b7 FXC |
13 | 2008-03-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
14 | ||
15 | PR libfortran/32812 | |
16 | * intrinsics/random.c (scramble_seed, unscramble_seed): New | |
17 | functions. | |
18 | (random_seed_i4): Scramble the seed the user gives us before | |
19 | storing it, and unscramble it when we return it back later. | |
20 | ||
25abf448 HPN |
21 | 2008-03-05 Hans-Peter Nilsson <hp@axis.com> |
22 | ||
23 | PR libfortran/35293 | |
24 | * io/unix.c (fd_truncate): Fold s->special_file case into | |
25 | success case of ftruncate/chsize call instead of the failure case. | |
26 | Make failure case actually return failure. Properly update stream | |
27 | pointers on failure. Call runtime_error for targets without | |
28 | neither ftruncate nor chsize where such a call would be needed. | |
29 | ||
f489fba1 FXC |
30 | 2008-03-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
31 | ||
32 | PR fortran/33197 | |
33 | * intrinsics/erfc_scaled_inc.c: New file. | |
34 | * intrinsics/erfc_scaled.c: New file. | |
35 | * gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*. | |
36 | * Makefile.am: Add intrinsics/erfc_scaled.c. | |
37 | * config.h.in: Regenerate. | |
38 | * configure: Regenerate. | |
39 | * Makefile.in: Regenerate. | |
40 | ||
9bd97567 FXC |
41 | 2008-03-01 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
42 | ||
43 | PR libfortran/35355 | |
44 | * intrinsics/time_1.h (__time_1): Fix calculation of user_usec | |
45 | for mingw. | |
46 | ||
4dabf736 JB |
47 | 2008-03-01 Janne Blomqvist <jb@gcc.gnu.org> |
48 | ||
49 | PR libfortran/35063 | |
50 | * io/unit.c (destroy_unit_mutex): Call __gthread_mutex_destroy | |
51 | instead of macro kludge. | |
52 | ||
cc4947e6 JB |
53 | 2008-02-25 Janne Blomqvist <jb@gcc.gnu.org> |
54 | ||
55 | PR fortran/29549 | |
f489fba1 FXC |
56 | * Makefile.am: Add -fcx-fortran-rules to AM_CFLAGS for all of |
57 | libgfortran. | |
58 | * Makefile.in: Regenerated. | |
cc4947e6 | 59 | |
5095283b FXC |
60 | 2008-02-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
61 | ||
62 | * m4/ifunction_logical.m4: Add casts to get rid of warnings. | |
63 | * generated/all_l1.c: Regenerate. | |
64 | * generated/all_l2.c: Regenerate. | |
65 | * generated/all_l4.c: Regenerate. | |
66 | * generated/all_l8.c: Regenerate. | |
67 | * generated/all_l16.c: Regenerate. | |
68 | * generated/any_l1.c: Regenerate. | |
69 | * generated/any_l2.c: Regenerate. | |
70 | * generated/any_l4.c: Regenerate. | |
71 | * generated/any_l8.c: Regenerate. | |
72 | * generated/any_l16.c: Regenerate. | |
73 | * generated/count_1_l.c: Regenerate. | |
74 | * generated/count_2_l.c: Regenerate. | |
75 | * generated/count_4_l.c: Regenerate. | |
76 | * generated/count_8_l.c: Regenerate. | |
77 | * generated/count_16_l.c: Regenerate. | |
78 | ||
a94caabf FXC |
79 | 2008-02-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> |
80 | ||
81 | PR libfortran/32841 | |
82 | * acinclude.m4: Don't use HAVE_MATH_H. | |
83 | * configure: Regenerate. | |
84 | ||
e32883d1 JD |
85 | 2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
86 | ||
87 | PR libfortran/35132 | |
88 | * io/transfer.c (next_record_w): Truncate after the last record for | |
89 | STREAM I/O. | |
90 | ||
91 | PR libfortran/34954 | |
92 | * io/transfer.c (data_transfer_init): Initialize dtp->rec if writing. | |
93 | ||
94 | PR libfortran/34974 | |
95 | * io/transfer.c (formatted_transfer_scalar): Flush the buffer if skips | |
96 | is less than zero. (next_record_w): Use sseek to position the file to | |
97 | the max position reached. | |
98 | ||
50a932e0 JD |
99 | 2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
100 | ||
101 | PR libfortran/35036 | |
102 | * write_float.def (output_float): Add error checks for zero digits | |
103 | after decimal point in E and D format specifiers. | |
104 | ||
ef4195d6 JD |
105 | 2008-02-10 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
106 | ||
107 | PR libfortran/35063 | |
108 | * io/unit.c (destroy_unit_mutex): New function that uses | |
109 | __gthread_mutex_destroy_function or pthread_mutex_destroy after | |
110 | unlocking and before free_mem for final closure of I/O unit. | |
111 | (delete_root): Use new function. | |
112 | (free_internal_unit): Likewise. | |
113 | (close_unit_1): Likewise. | |
114 | ||
ee440dd0 TK |
115 | 2008-02-02 Thomas Koenig <tkoenig@gcc.gnu.org> |
116 | ||
117 | PR libfortran/35001 | |
118 | * m4/shape.m4: Return 0 for extents <= 0. | |
119 | * generated/shape_i4.c: Regenerated. | |
120 | * generated/shape_i8.c: Regenerated. | |
121 | * generated/shape_i16.c: Regenerated. | |
122 | ||
bc814056 TK |
123 | 2008-01-27 Thomas Koenig <tkoenig@gcc.gnu.org> |
124 | ||
125 | PR libfortran/34980 | |
126 | * m4/shape.m4: If return array is empty, return early. | |
127 | * generated/shape_i4.c: Regenerated. | |
128 | * generated/shape_i8.c: Regenerated. | |
129 | * generated/shape_i16.c: Regenerated. | |
130 | ||
6cac3630 TK |
131 | 2008-01-26 Thomas Koenig <tkoenig@gcc.gnu.org> |
132 | ||
133 | PR libfofortran/34887 | |
134 | * io/transfer.c (next_record_w): Always move to the farthest | |
135 | position when completing the record (also when we are | |
136 | processing a slash edit descriptor). | |
137 | ||
12d9e9be | 138 | 2008-01-25 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
4152bc26 JD |
139 | |
140 | PR libfortran/34876 | |
141 | * io/transfer.c (write_buf): Handle case of zero sized array. | |
142 | (transfer_array): Set data pointer to NULL and size to zero. Then | |
143 | make a data transfer and return. | |
144 | ||
4f6bebc3 DE |
145 | 2008-01-24 David Edelsohn <edelsohn@gnu.org> |
146 | ||
147 | * configure: Regenerate. | |
148 | ||
17c2c96c JD |
149 | 2008-01-19 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
150 | ||
2045a99a | 151 | PR libfortran/34795 |
17c2c96c JD |
152 | * io/inquire.c (inquire_via_unit): If a unit is opened, return values |
153 | according to the open action for DIRECT, FORMATTED, and UNFORMATTED. | |
154 | (inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT, | |
155 | FORAMATTED, and UNFORMATTED inquiries. | |
156 | * io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate | |
157 | for files that are not opened. (inquire_direct): Same. | |
158 | (inquire_formatted): Same. | |
159 | ||
6c540522 JD |
160 | 2008-01-18 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
161 | ||
2045a99a | 162 | PR libfortran/34782 |
6c540522 JD |
163 | * io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater |
164 | of the current max_pos or the newly calculated position. | |
165 | ||
81014334 TB |
166 | 2008-01-18 Tobias Burnus <burnus@net-b.de> |
167 | ||
168 | * io/write.c (write_real): Increase default precision | |
169 | for REAL(16) by one. | |
170 | ||
4349e292 SB |
171 | 2008-01-16 Steven Bosscher <steven@gcc.gnu.org> |
172 | ||
173 | PR libfortran/34669 | |
174 | * mk-kinds-h.sh: Compile with -S to avoid calling the assembler, | |
175 | to avoid piping the -fdump-parse-tree output to the assembler | |
176 | when configuring with -pipe. | |
177 | * mk-sik-inc.sh: Likewise. | |
178 | * mk-srk-inc.sh: Likewise. | |
179 | ||
90469382 TK |
180 | 2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org> |
181 | ||
182 | PR libfortran/34671 | |
183 | * gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2, | |
184 | _gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l, | |
185 | _gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and | |
186 | _gfortran_count_8_l Removed _gfortran_count_16_l16, | |
187 | _gfortran_count_16_l4, _gfortran_count_16_l8, | |
188 | _gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8, | |
189 | _gfortran_count_8_l16, _gfortran_count_8_l4 and | |
190 | _gfortran_count_8_l8. | |
191 | * Makefile.am: Added generated/any_l1.c and generated/any_l2.c to | |
192 | i_any_c. Added generated/all_l1. and generated/all_l2.c to | |
193 | i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c, | |
194 | generated/count_16_l4.c, generated/count_4_l8.c, | |
195 | generated/count_8_l8.c, generated/count_16_l8.c, | |
196 | generated/count_4_l16.c, generated/count_8_l16.c, and | |
197 | generated/count_16_l16.c from i_count_c. Added count_1_l.c, | |
198 | count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to | |
199 | i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for | |
200 | any of the files generated from all.m4, any.m4 and count.m4. | |
201 | * Makefile.in: Regenerated. | |
202 | * m4/ifunction_logical.m4: New file. Use | |
203 | GFC_LOGICAL_1 pointer for access to source arrays. | |
204 | * m4/any.m4: Include ifunction_logical.m4 instead of | |
205 | ifunction.m4. Don't check atype_name. | |
206 | * m4/all.m4: Likewise. | |
207 | * m4/count.m4: Likewise. | |
208 | * generated/any_l1.c: New file. | |
209 | * generated/any_l2.c: New file. | |
210 | * generated/all_l1.c: New file. | |
211 | * generated/count_1_l.c: New file. | |
212 | * generated/count_2_l.c: New file. | |
213 | * generated/count_4_l.c: New file. | |
214 | * generated/count_8_l.c: New file. | |
215 | * generated/count_16_l.c: New file. | |
216 | * generated/any_l4.c: Regenerated. | |
217 | * generated/any_l8.c: Regenerated. | |
218 | * generated/any_l16.c: Regenerated. | |
219 | * generated/all_l4.c: Regenerated. | |
220 | * generated/all_l8.c: Regenerated. | |
221 | * generated/all_l16.c: Regenerated. | |
222 | * generated/count_4_l4.c: Removed. | |
223 | * generated/count_4_l8.c: Removed. | |
224 | * generated/count_4_l16.c: Removed. | |
225 | * generated/count_8_l4.c: Removed. | |
226 | * generated/count_8_l8.c: Removed. | |
227 | * generated/count_8_l16.c: Removed. | |
228 | * generated/count_16_l4.c: Removed. | |
229 | * generated/count_16_l8.c: Removed. | |
230 | * generated/count_16_l16.c: Removed. | |
231 | ||
ccacefc7 TK |
232 | 2008-01-13 Thomas Koenig <tkoenig@gcc.gnu.org> |
233 | ||
234 | PR libfortran/34746 | |
235 | * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Use %ld | |
236 | in printf format for all bounds checking; cast all | |
237 | integer-like arguments to runtime_error() to long int. | |
238 | (`m'name`'rtype_qual`_'atype_code): Likewise. | |
239 | (`s'name`'rtype_qual`_'atype_code): Likewise. | |
240 | * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Likewise. | |
241 | (`m'name`'rtype_qual`_'atype_code): Likewise. | |
242 | (`s'name`'rtype_qual`_'atype_code): Likewise. | |
243 | * generated/all_l16.c: Regenerated. | |
244 | * generated/all_l4.c: Regenerated. | |
245 | * generated/all_l8.c: Regenerated. | |
246 | * generated/any_l16.c: Regenerated. | |
247 | * generated/any_l4.c: Regenerated. | |
248 | * generated/any_l8.c: Regenerated. | |
249 | * generated/count_16_l16.c: Regenerated. | |
250 | * generated/count_16_l4.c: Regenerated. | |
251 | * generated/count_16_l8.c: Regenerated. | |
252 | * generated/count_4_l16.c: Regenerated. | |
253 | * generated/count_4_l4.c: Regenerated. | |
254 | * generated/count_4_l8.c: Regenerated. | |
255 | * generated/count_8_l16.c: Regenerated. | |
256 | * generated/count_8_l4.c: Regenerated. | |
257 | * generated/count_8_l8.c: Regenerated. | |
258 | * generated/maxloc0_16_i1.c: Regenerated. | |
259 | * generated/maxloc0_16_i16.c: Regenerated. | |
260 | * generated/maxloc0_16_i2.c: Regenerated. | |
261 | * generated/maxloc0_16_i4.c: Regenerated. | |
262 | * generated/maxloc0_16_i8.c: Regenerated. | |
263 | * generated/maxloc0_16_r10.c: Regenerated. | |
264 | * generated/maxloc0_16_r16.c: Regenerated. | |
265 | * generated/maxloc0_16_r4.c: Regenerated. | |
266 | * generated/maxloc0_16_r8.c: Regenerated. | |
267 | * generated/maxloc0_4_i1.c: Regenerated. | |
268 | * generated/maxloc0_4_i16.c: Regenerated. | |
269 | * generated/maxloc0_4_i2.c: Regenerated. | |
270 | * generated/maxloc0_4_i4.c: Regenerated. | |
271 | * generated/maxloc0_4_i8.c: Regenerated. | |
272 | * generated/maxloc0_4_r10.c: Regenerated. | |
273 | * generated/maxloc0_4_r16.c: Regenerated. | |
274 | * generated/maxloc0_4_r4.c: Regenerated. | |
275 | * generated/maxloc0_4_r8.c: Regenerated. | |
276 | * generated/maxloc0_8_i1.c: Regenerated. | |
277 | * generated/maxloc0_8_i16.c: Regenerated. | |
278 | * generated/maxloc0_8_i2.c: Regenerated. | |
279 | * generated/maxloc0_8_i4.c: Regenerated. | |
280 | * generated/maxloc0_8_i8.c: Regenerated. | |
281 | * generated/maxloc0_8_r10.c: Regenerated. | |
282 | * generated/maxloc0_8_r16.c: Regenerated. | |
283 | * generated/maxloc0_8_r4.c: Regenerated. | |
284 | * generated/maxloc0_8_r8.c: Regenerated. | |
285 | * generated/maxloc1_16_i1.c: Regenerated. | |
286 | * generated/maxloc1_16_i16.c: Regenerated. | |
287 | * generated/maxloc1_16_i2.c: Regenerated. | |
288 | * generated/maxloc1_16_i4.c: Regenerated. | |
289 | * generated/maxloc1_16_i8.c: Regenerated. | |
290 | * generated/maxloc1_16_r10.c: Regenerated. | |
291 | * generated/maxloc1_16_r16.c: Regenerated. | |
292 | * generated/maxloc1_16_r4.c: Regenerated. | |
293 | * generated/maxloc1_16_r8.c: Regenerated. | |
294 | * generated/maxloc1_4_i1.c: Regenerated. | |
295 | * generated/maxloc1_4_i16.c: Regenerated. | |
296 | * generated/maxloc1_4_i2.c: Regenerated. | |
297 | * generated/maxloc1_4_i4.c: Regenerated. | |
298 | * generated/maxloc1_4_i8.c: Regenerated. | |
299 | * generated/maxloc1_4_r10.c: Regenerated. | |
300 | * generated/maxloc1_4_r16.c: Regenerated. | |
301 | * generated/maxloc1_4_r4.c: Regenerated. | |
302 | * generated/maxloc1_4_r8.c: Regenerated. | |
303 | * generated/maxloc1_8_i1.c: Regenerated. | |
304 | * generated/maxloc1_8_i16.c: Regenerated. | |
305 | * generated/maxloc1_8_i2.c: Regenerated. | |
306 | * generated/maxloc1_8_i4.c: Regenerated. | |
307 | * generated/maxloc1_8_i8.c: Regenerated. | |
308 | * generated/maxloc1_8_r10.c: Regenerated. | |
309 | * generated/maxloc1_8_r16.c: Regenerated. | |
310 | * generated/maxloc1_8_r4.c: Regenerated. | |
311 | * generated/maxloc1_8_r8.c: Regenerated. | |
312 | * generated/maxval_i1.c: Regenerated. | |
313 | * generated/maxval_i16.c: Regenerated. | |
314 | * generated/maxval_i2.c: Regenerated. | |
315 | * generated/maxval_i4.c: Regenerated. | |
316 | * generated/maxval_i8.c: Regenerated. | |
317 | * generated/maxval_r10.c: Regenerated. | |
318 | * generated/maxval_r16.c: Regenerated. | |
319 | * generated/maxval_r4.c: Regenerated. | |
320 | * generated/maxval_r8.c: Regenerated. | |
321 | * generated/minloc0_16_i1.c: Regenerated. | |
322 | * generated/minloc0_16_i16.c: Regenerated. | |
323 | * generated/minloc0_16_i2.c: Regenerated. | |
324 | * generated/minloc0_16_i4.c: Regenerated. | |
325 | * generated/minloc0_16_i8.c: Regenerated. | |
326 | * generated/minloc0_16_r10.c: Regenerated. | |
327 | * generated/minloc0_16_r16.c: Regenerated. | |
328 | * generated/minloc0_16_r4.c: Regenerated. | |
329 | * generated/minloc0_16_r8.c: Regenerated. | |
330 | * generated/minloc0_4_i1.c: Regenerated. | |
331 | * generated/minloc0_4_i16.c: Regenerated. | |
332 | * generated/minloc0_4_i2.c: Regenerated. | |
333 | * generated/minloc0_4_i4.c: Regenerated. | |
334 | * generated/minloc0_4_i8.c: Regenerated. | |
335 | * generated/minloc0_4_r10.c: Regenerated. | |
336 | * generated/minloc0_4_r16.c: Regenerated. | |
337 | * generated/minloc0_4_r4.c: Regenerated. | |
338 | * generated/minloc0_4_r8.c: Regenerated. | |
339 | * generated/minloc0_8_i1.c: Regenerated. | |
340 | * generated/minloc0_8_i16.c: Regenerated. | |
341 | * generated/minloc0_8_i2.c: Regenerated. | |
342 | * generated/minloc0_8_i4.c: Regenerated. | |
343 | * generated/minloc0_8_i8.c: Regenerated. | |
344 | * generated/minloc0_8_r10.c: Regenerated. | |
345 | * generated/minloc0_8_r16.c: Regenerated. | |
346 | * generated/minloc0_8_r4.c: Regenerated. | |
347 | * generated/minloc0_8_r8.c: Regenerated. | |
348 | * generated/minloc1_16_i1.c: Regenerated. | |
349 | * generated/minloc1_16_i16.c: Regenerated. | |
350 | * generated/minloc1_16_i2.c: Regenerated. | |
351 | * generated/minloc1_16_i4.c: Regenerated. | |
352 | * generated/minloc1_16_i8.c: Regenerated. | |
353 | * generated/minloc1_16_r10.c: Regenerated. | |
354 | * generated/minloc1_16_r16.c: Regenerated. | |
355 | * generated/minloc1_16_r4.c: Regenerated. | |
356 | * generated/minloc1_16_r8.c: Regenerated. | |
357 | * generated/minloc1_4_i1.c: Regenerated. | |
358 | * generated/minloc1_4_i16.c: Regenerated. | |
359 | * generated/minloc1_4_i2.c: Regenerated. | |
360 | * generated/minloc1_4_i4.c: Regenerated. | |
361 | * generated/minloc1_4_i8.c: Regenerated. | |
362 | * generated/minloc1_4_r10.c: Regenerated. | |
363 | * generated/minloc1_4_r16.c: Regenerated. | |
364 | * generated/minloc1_4_r4.c: Regenerated. | |
365 | * generated/minloc1_4_r8.c: Regenerated. | |
366 | * generated/minloc1_8_i1.c: Regenerated. | |
367 | * generated/minloc1_8_i16.c: Regenerated. | |
368 | * generated/minloc1_8_i2.c: Regenerated. | |
369 | * generated/minloc1_8_i4.c: Regenerated. | |
370 | * generated/minloc1_8_i8.c: Regenerated. | |
371 | * generated/minloc1_8_r10.c: Regenerated. | |
372 | * generated/minloc1_8_r16.c: Regenerated. | |
373 | * generated/minloc1_8_r4.c: Regenerated. | |
374 | * generated/minloc1_8_r8.c: Regenerated. | |
375 | * generated/minval_i1.c: Regenerated. | |
376 | * generated/minval_i16.c: Regenerated. | |
377 | * generated/minval_i2.c: Regenerated. | |
378 | * generated/minval_i4.c: Regenerated. | |
379 | * generated/minval_i8.c: Regenerated. | |
380 | * generated/minval_r10.c: Regenerated. | |
381 | * generated/minval_r16.c: Regenerated. | |
382 | * generated/minval_r4.c: Regenerated. | |
383 | * generated/minval_r8.c: Regenerated. | |
384 | * generated/product_c10.c: Regenerated. | |
385 | * generated/product_c16.c: Regenerated. | |
386 | * generated/product_c4.c: Regenerated. | |
387 | * generated/product_c8.c: Regenerated. | |
388 | * generated/product_i1.c: Regenerated. | |
389 | * generated/product_i16.c: Regenerated. | |
390 | * generated/product_i2.c: Regenerated. | |
391 | * generated/product_i4.c: Regenerated. | |
392 | * generated/product_i8.c: Regenerated. | |
393 | * generated/product_r10.c: Regenerated. | |
394 | * generated/product_r16.c: Regenerated. | |
395 | * generated/product_r4.c: Regenerated. | |
396 | * generated/product_r8.c: Regenerated. | |
397 | * generated/sum_c10.c: Regenerated. | |
398 | * generated/sum_c16.c: Regenerated. | |
399 | * generated/sum_c4.c: Regenerated. | |
400 | * generated/sum_c8.c: Regenerated. | |
401 | * generated/sum_i1.c: Regenerated. | |
402 | * generated/sum_i16.c: Regenerated. | |
403 | * generated/sum_i2.c: Regenerated. | |
404 | * generated/sum_i4.c: Regenerated. | |
405 | * generated/sum_i8.c: Regenerated. | |
406 | * generated/sum_r10.c: Regenerated. | |
407 | * generated/sum_r16.c: Regenerated. | |
408 | * generated/sum_r4.c: Regenerated. | |
409 | * generated/sum_r8.c: Regenerated. | |
410 | ||
fd6590f8 TK |
411 | 2008-01-11 Thomas Koenig <tkoenig@gcc.gnu.org> |
412 | ||
413 | PR libfortran/34670 | |
414 | * m4/iparm.m4 (upcase): New macro (copied from the m4 manual). | |
415 | (u_name): New macro for the upper case name of the intrinsic. | |
416 | * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Add | |
417 | bounds checking and rank check, depending on | |
418 | compile_options.bounds_check. | |
419 | (`m'name`'rtype_qual`_'atype_code): Likewise. | |
420 | (`s'name`'rtype_qual`_'atype_code): Likewise. | |
421 | * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Add | |
422 | bounds checking and rank check, depending on | |
423 | compile_options.bounds_check. | |
424 | (`m'name`'rtype_qual`_'atype_code): Likewise. | |
425 | (`s'name`'rtype_qual`_'atype_code): Likewise. | |
426 | * generated/all_l16.c: Regenerated. | |
427 | * generated/all_l4.c: Regenerated. | |
428 | * generated/all_l8.c: Regenerated. | |
429 | * generated/any_l16.c: Regenerated. | |
430 | * generated/any_l4.c: Regenerated. | |
431 | * generated/any_l8.c: Regenerated. | |
432 | * generated/count_16_l16.c: Regenerated. | |
433 | * generated/count_16_l4.c: Regenerated. | |
434 | * generated/count_16_l8.c: Regenerated. | |
435 | * generated/count_4_l16.c: Regenerated. | |
436 | * generated/count_4_l4.c: Regenerated. | |
437 | * generated/count_4_l8.c: Regenerated. | |
438 | * generated/count_8_l16.c: Regenerated. | |
439 | * generated/count_8_l4.c: Regenerated. | |
440 | * generated/count_8_l8.c: Regenerated. | |
441 | * generated/maxloc0_16_i1.c: Regenerated. | |
442 | * generated/maxloc0_16_i16.c: Regenerated. | |
443 | * generated/maxloc0_16_i2.c: Regenerated. | |
444 | * generated/maxloc0_16_i4.c: Regenerated. | |
445 | * generated/maxloc0_16_i8.c: Regenerated. | |
446 | * generated/maxloc0_16_r10.c: Regenerated. | |
447 | * generated/maxloc0_16_r16.c: Regenerated. | |
448 | * generated/maxloc0_16_r4.c: Regenerated. | |
449 | * generated/maxloc0_16_r8.c: Regenerated. | |
450 | * generated/maxloc0_4_i1.c: Regenerated. | |
451 | * generated/maxloc0_4_i16.c: Regenerated. | |
452 | * generated/maxloc0_4_i2.c: Regenerated. | |
453 | * generated/maxloc0_4_i4.c: Regenerated. | |
454 | * generated/maxloc0_4_i8.c: Regenerated. | |
455 | * generated/maxloc0_4_r10.c: Regenerated. | |
456 | * generated/maxloc0_4_r16.c: Regenerated. | |
457 | * generated/maxloc0_4_r4.c: Regenerated. | |
458 | * generated/maxloc0_4_r8.c: Regenerated. | |
459 | * generated/maxloc0_8_i1.c: Regenerated. | |
460 | * generated/maxloc0_8_i16.c: Regenerated. | |
461 | * generated/maxloc0_8_i2.c: Regenerated. | |
462 | * generated/maxloc0_8_i4.c: Regenerated. | |
463 | * generated/maxloc0_8_i8.c: Regenerated. | |
464 | * generated/maxloc0_8_r10.c: Regenerated. | |
465 | * generated/maxloc0_8_r16.c: Regenerated. | |
466 | * generated/maxloc0_8_r4.c: Regenerated. | |
467 | * generated/maxloc0_8_r8.c: Regenerated. | |
468 | * generated/maxloc1_16_i1.c: Regenerated. | |
469 | * generated/maxloc1_16_i16.c: Regenerated. | |
470 | * generated/maxloc1_16_i2.c: Regenerated. | |
471 | * generated/maxloc1_16_i4.c: Regenerated. | |
472 | * generated/maxloc1_16_i8.c: Regenerated. | |
473 | * generated/maxloc1_16_r10.c: Regenerated. | |
474 | * generated/maxloc1_16_r16.c: Regenerated. | |
475 | * generated/maxloc1_16_r4.c: Regenerated. | |
476 | * generated/maxloc1_16_r8.c: Regenerated. | |
477 | * generated/maxloc1_4_i1.c: Regenerated. | |
478 | * generated/maxloc1_4_i16.c: Regenerated. | |
479 | * generated/maxloc1_4_i2.c: Regenerated. | |
480 | * generated/maxloc1_4_i4.c: Regenerated. | |
481 | * generated/maxloc1_4_i8.c: Regenerated. | |
482 | * generated/maxloc1_4_r10.c: Regenerated. | |
483 | * generated/maxloc1_4_r16.c: Regenerated. | |
484 | * generated/maxloc1_4_r4.c: Regenerated. | |
485 | * generated/maxloc1_4_r8.c: Regenerated. | |
486 | * generated/maxloc1_8_i1.c: Regenerated. | |
487 | * generated/maxloc1_8_i16.c: Regenerated. | |
488 | * generated/maxloc1_8_i2.c: Regenerated. | |
489 | * generated/maxloc1_8_i4.c: Regenerated. | |
490 | * generated/maxloc1_8_i8.c: Regenerated. | |
491 | * generated/maxloc1_8_r10.c: Regenerated. | |
492 | * generated/maxloc1_8_r16.c: Regenerated. | |
493 | * generated/maxloc1_8_r4.c: Regenerated. | |
494 | * generated/maxloc1_8_r8.c: Regenerated. | |
495 | * generated/maxval_i1.c: Regenerated. | |
496 | * generated/maxval_i16.c: Regenerated. | |
497 | * generated/maxval_i2.c: Regenerated. | |
498 | * generated/maxval_i4.c: Regenerated. | |
499 | * generated/maxval_i8.c: Regenerated. | |
500 | * generated/maxval_r10.c: Regenerated. | |
501 | * generated/maxval_r16.c: Regenerated. | |
502 | * generated/maxval_r4.c: Regenerated. | |
503 | * generated/maxval_r8.c: Regenerated. | |
504 | * generated/minloc0_16_i1.c: Regenerated. | |
505 | * generated/minloc0_16_i16.c: Regenerated. | |
506 | * generated/minloc0_16_i2.c: Regenerated. | |
507 | * generated/minloc0_16_i4.c: Regenerated. | |
508 | * generated/minloc0_16_i8.c: Regenerated. | |
509 | * generated/minloc0_16_r10.c: Regenerated. | |
510 | * generated/minloc0_16_r16.c: Regenerated. | |
511 | * generated/minloc0_16_r4.c: Regenerated. | |
512 | * generated/minloc0_16_r8.c: Regenerated. | |
513 | * generated/minloc0_4_i1.c: Regenerated. | |
514 | * generated/minloc0_4_i16.c: Regenerated. | |
515 | * generated/minloc0_4_i2.c: Regenerated. | |
516 | * generated/minloc0_4_i4.c: Regenerated. | |
517 | * generated/minloc0_4_i8.c: Regenerated. | |
518 | * generated/minloc0_4_r10.c: Regenerated. | |
519 | * generated/minloc0_4_r16.c: Regenerated. | |
520 | * generated/minloc0_4_r4.c: Regenerated. | |
521 | * generated/minloc0_4_r8.c: Regenerated. | |
522 | * generated/minloc0_8_i1.c: Regenerated. | |
523 | * generated/minloc0_8_i16.c: Regenerated. | |
524 | * generated/minloc0_8_i2.c: Regenerated. | |
525 | * generated/minloc0_8_i4.c: Regenerated. | |
526 | * generated/minloc0_8_i8.c: Regenerated. | |
527 | * generated/minloc0_8_r10.c: Regenerated. | |
528 | * generated/minloc0_8_r16.c: Regenerated. | |
529 | * generated/minloc0_8_r4.c: Regenerated. | |
530 | * generated/minloc0_8_r8.c: Regenerated. | |
531 | * generated/minloc1_16_i1.c: Regenerated. | |
532 | * generated/minloc1_16_i16.c: Regenerated. | |
533 | * generated/minloc1_16_i2.c: Regenerated. | |
534 | * generated/minloc1_16_i4.c: Regenerated. | |
535 | * generated/minloc1_16_i8.c: Regenerated. | |
536 | * generated/minloc1_16_r10.c: Regenerated. | |
537 | * generated/minloc1_16_r16.c: Regenerated. | |
538 | * generated/minloc1_16_r4.c: Regenerated. | |
539 | * generated/minloc1_16_r8.c: Regenerated. | |
540 | * generated/minloc1_4_i1.c: Regenerated. | |
541 | * generated/minloc1_4_i16.c: Regenerated. | |
542 | * generated/minloc1_4_i2.c: Regenerated. | |
543 | * generated/minloc1_4_i4.c: Regenerated. | |
544 | * generated/minloc1_4_i8.c: Regenerated. | |
545 | * generated/minloc1_4_r10.c: Regenerated. | |
546 | * generated/minloc1_4_r16.c: Regenerated. | |
547 | * generated/minloc1_4_r4.c: Regenerated. | |
548 | * generated/minloc1_4_r8.c: Regenerated. | |
549 | * generated/minloc1_8_i1.c: Regenerated. | |
550 | * generated/minloc1_8_i16.c: Regenerated. | |
551 | * generated/minloc1_8_i2.c: Regenerated. | |
552 | * generated/minloc1_8_i4.c: Regenerated. | |
553 | * generated/minloc1_8_i8.c: Regenerated. | |
554 | * generated/minloc1_8_r10.c: Regenerated. | |
555 | * generated/minloc1_8_r16.c: Regenerated. | |
556 | * generated/minloc1_8_r4.c: Regenerated. | |
557 | * generated/minloc1_8_r8.c: Regenerated. | |
558 | * generated/minval_i1.c: Regenerated. | |
559 | * generated/minval_i16.c: Regenerated. | |
560 | * generated/minval_i2.c: Regenerated. | |
561 | * generated/minval_i4.c: Regenerated. | |
562 | * generated/minval_i8.c: Regenerated. | |
563 | * generated/minval_r10.c: Regenerated. | |
564 | * generated/minval_r16.c: Regenerated. | |
565 | * generated/minval_r4.c: Regenerated. | |
566 | * generated/minval_r8.c: Regenerated. | |
567 | * generated/product_c10.c: Regenerated. | |
568 | * generated/product_c16.c: Regenerated. | |
569 | * generated/product_c4.c: Regenerated. | |
570 | * generated/product_c8.c: Regenerated. | |
571 | * generated/product_i1.c: Regenerated. | |
572 | * generated/product_i16.c: Regenerated. | |
573 | * generated/product_i2.c: Regenerated. | |
574 | * generated/product_i4.c: Regenerated. | |
575 | * generated/product_i8.c: Regenerated. | |
576 | * generated/product_r10.c: Regenerated. | |
577 | * generated/product_r16.c: Regenerated. | |
578 | * generated/product_r4.c: Regenerated. | |
579 | * generated/product_r8.c: Regenerated. | |
580 | * generated/sum_c10.c: Regenerated. | |
581 | * generated/sum_c16.c: Regenerated. | |
582 | * generated/sum_c4.c: Regenerated. | |
583 | * generated/sum_c8.c: Regenerated. | |
584 | * generated/sum_i1.c: Regenerated. | |
585 | * generated/sum_i16.c: Regenerated. | |
586 | * generated/sum_i2.c: Regenerated. | |
587 | * generated/sum_i4.c: Regenerated. | |
588 | * generated/sum_i8.c: Regenerated. | |
589 | * generated/sum_r10.c: Regenerated. | |
590 | * generated/sum_r16.c: Regenerated. | |
591 | * generated/sum_r4.c: Regenerated. | |
592 | * generated/sum_r8.c: Regenerated. | |
593 | ||
fa347f22 JD |
594 | 2008-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
595 | ||
596 | PR libfortran/34676 | |
597 | * io/list_read.c (next_char): Only save the EOF condition for later if | |
598 | advance="no". | |
599 | ||
9370b3c0 TK |
600 | 2008-01-03 Thomas Koenig <tkoenig@gcc.gnu.org> |
601 | ||
602 | PR libfortran/34565 | |
603 | * io/io.h: Adjust protoypes for open_internal(), | |
604 | next_array_record() and init_loop_spec(). | |
605 | * io/list_read.c (next_char): Use argument "finished" | |
606 | of next_array_record to check for end on internal file. | |
607 | * io/unit.c: Calculate the offset for an array | |
608 | internal file and supply this informatin to open_internal(). | |
609 | * io/unix.c (open_internal): Set the offset for the internal | |
610 | file on open. | |
611 | * io/transfer.c (init_loop_spec): Calculate the starting | |
612 | record in case of negative strides. Return size of 0 for | |
613 | an empty array. | |
614 | (next_array_record): Use an extra flag to signal that the | |
615 | array is finished. | |
616 | (next_record_r): Use the new flag to next_array_record(). | |
617 | (next_record_w): Likewise. |