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