diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2013-05-26 08:55:43 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2013-05-26 08:55:43 +0000 |
| commit | 0746af5e6219d9dabd84aa865a056e4e8ae27c3d (patch) | |
| tree | 2ba96ffba3c3470089ec22f415de86bf5b32226d /gcc/ada/gcc-interface/utils2.c | |
| parent | 3fd7a66fddefe6ea59a42fc1139f715d0e3bb72f (diff) | |
| download | gcc-0746af5e6219d9dabd84aa865a056e4e8ae27c3d.zip gcc-0746af5e6219d9dabd84aa865a056e4e8ae27c3d.tar.gz gcc-0746af5e6219d9dabd84aa865a056e4e8ae27c3d.tar.bz2 | |
gigi.h (make_aligning_type): Adjust prototype.
* gcc-interface/gigi.h (make_aligning_type): Adjust prototype.
* gcc-interface/utils.c (make_aligning_type): Take GNAT_NODE parameter
for the position of the associated TYPE_DECL.
* gcc-interface/decl.c (gnat_to_gnu_entity): Adjust call to above.
* gcc-interface/utils2.c (maybe_wrap_malloc): Likewise.
From-SVN: r199337
Diffstat (limited to 'gcc/ada/gcc-interface/utils2.c')
| -rw-r--r-- | gcc/ada/gcc-interface/utils2.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/gcc-interface/utils2.c b/gcc/ada/gcc-interface/utils2.c index 71dd8e5..3f39a43 100644 --- a/gcc/ada/gcc-interface/utils2.c +++ b/gcc/ada/gcc-interface/utils2.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * Copyright (C) 1992-2012, Free Software Foundation, Inc. * + * Copyright (C) 1992-2013, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * * terms of the GNU General Public License as published by the Free Soft- * @@ -2101,7 +2101,8 @@ maybe_wrap_malloc (tree data_size, tree data_type, Node_Id gnat_node) = ((data_align > system_allocator_alignment) ? make_aligning_type (data_type, data_align, data_size, system_allocator_alignment, - POINTER_SIZE / BITS_PER_UNIT) + POINTER_SIZE / BITS_PER_UNIT, + gnat_node) : NULL_TREE); tree size_to_malloc |