diff options
| author | Jan Hubicka <jh@suse.cz> | 2005-01-25 20:32:53 +0100 |
|---|---|---|
| committer | Jan Hubicka <hubicka@gcc.gnu.org> | 2005-01-25 19:32:53 +0000 |
| commit | ed464869fad50023f8cda82031f1a6ab979a317d (patch) | |
| tree | 915504c6a0f0f884f4687bfa1581c187533d9f4c /gcc | |
| parent | 1b746b0f2af6ab50e9a08244bdf23380c85c4e20 (diff) | |
| download | gcc-ed464869fad50023f8cda82031f1a6ab979a317d.zip gcc-ed464869fad50023f8cda82031f1a6ab979a317d.tar.gz gcc-ed464869fad50023f8cda82031f1a6ab979a317d.tar.bz2 | |
re PR tree-optimization/19337 (ada does not compile at -O3 (nested functions related))
PR tree-optimize/19337
* gcc.c-torture/compile/20050119-1.c: New test.
PR tree-optimize/19337
* tree-inline.c (initialize_inlined_parameters): Copy
saved_static_chain_decl only.
From-SVN: r94226
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.c-torture/compile/20050119-1.c | 25 | ||||
| -rw-r--r-- | gcc/tree-inline.c | 2 |
4 files changed, 38 insertions, 0 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index d659cdb..f7cf25d 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2005-01-18 Jan Hubicka <jh@suse.cz> + + PR tree-optimize/19337 + * tree-inline.c (initialize_inlined_parameters): Copy + saved_static_chain_decl only. + 2005-01-25 Richard Henderson <rth@redhat.com> PR target/19556 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index cd0415a..bc2bc83 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2005-01-18 Jan Hubicka <jh@suse.cz> + + PR tree-optimize/19337 + * gcc.c-torture/compile/20050119-1.c: New test. + 2005-01-24 James E Wilson <wilson@specifixinc.com> * gcc.c-torture/execute/builtins/lib/strstr.c (strstr): Correct exit diff --git a/gcc/testsuite/gcc.c-torture/compile/20050119-1.c b/gcc/testsuite/gcc.c-torture/compile/20050119-1.c new file mode 100644 index 0000000..4f14ea4 --- /dev/null +++ b/gcc/testsuite/gcc.c-torture/compile/20050119-1.c @@ -0,0 +1,25 @@ +void write_char(char); +int len(char*); +void f(char *a) +{ + int col = 0; + int i; + void wchar(char c) + { + if (c == '\t') + { + do { + wchar(' '); + } while ((col%8)!=0); + } + else + { + write_char (c); + col++; + } + } + for(i =0;i<len(a);i++) + { + wchar(*a); + } +} diff --git a/gcc/tree-inline.c b/gcc/tree-inline.c index b46276a..eca80c3 100644 --- a/gcc/tree-inline.c +++ b/gcc/tree-inline.c @@ -809,6 +809,8 @@ initialize_inlined_parameters (inline_data *id, tree args, tree static_chain, /* Initialize the static chain. */ p = DECL_STRUCT_FUNCTION (fn)->static_chain_decl; + if (fn == current_function_decl) + p = DECL_STRUCT_FUNCTION (fn)->saved_static_chain_decl; if (p) { /* No static chain? Seems like a bug in tree-nested.c. */ |