diff options
| author | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-14 10:12:17 +0000 |
|---|---|---|
| committer | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-14 10:12:17 +0000 |
| commit | 19895fc10b2219ca4c49de5d99ba73d3a024fbc9 (patch) | |
| tree | c2963bb336cabb4f3f780c2faf9a7041c131dbc1 /libjava/classpath/testsuite/java.lang/StringTest.java | |
| parent | 70e9546799274a3efa8e96e77dc681a62082bb9e (diff) | |
| download | ppe42-gcc-19895fc10b2219ca4c49de5d99ba73d3a024fbc9.tar.gz ppe42-gcc-19895fc10b2219ca4c49de5d99ba73d3a024fbc9.zip | |
* gfortran.h (MAX_ERROR_MESSAGE): Remove.
(gfc_error_buf): Add allocated and index fields. Change message
field from array to a pointer.
* error.c (use_warning_buffer, error_ptr, warning_ptr): Remove.
(cur_error_buffer): New variable.
(error_char): Use cur_error_buffer->{message,index} instead of
{warning,error}_{buffer.message,ptr}. Reallocate message buffer
if too small.
(gfc_warning, gfc_notify_std, gfc_error, gfc_error_now): Setup
cur_error_buffer and its index rather than {warning,error}_ptr
and use_warning_buffer.
(gfc_warning_check, gfc_error_check): Don't print anything if
message is NULL.
(gfc_push_error): Allocate saved message with xstrdup.
(gfc_pop_error): Free saved message with gfc_free.
(gfc_free_error): New function.
* primary.c (match_complex_constant): Call gfc_free_error if
gfc_pop_error will not be called.
* match.c (gfc_match_st_function): Likewise.
* gfortran.dg/g77/cpp6.f: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102015 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libjava/classpath/testsuite/java.lang/StringTest.java')
0 files changed, 0 insertions, 0 deletions
