summaryrefslogtreecommitdiff
path: root/gcc/ada/i-cpp.adb
diff options
context:
space:
mode:
authorMatthew Gingell <gingell@gnat.com>2004-10-27 15:05:18 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2004-10-27 15:05:18 +0200
commit3f02ce5de478bdaf2769969d37c2e7c0d5a03ce9 (patch)
treeb816c9b29ae8b833e46583d85835a7d0377ab429 /gcc/ada/i-cpp.adb
parent9cc29fc6f4116e86c5b09ce2915673caec1029b8 (diff)
downloadgcc-3f02ce5de478bdaf2769969d37c2e7c0d5a03ce9.tar.gz
i-cpp.ads, i-cpp.adb: Change layout of VTable for new C++ ABI.
2004-10-26 Matthew Gingell <gingell@gnat.com> * i-cpp.ads, i-cpp.adb: Change layout of VTable for new C++ ABI. From-SVN: r89655
Diffstat (limited to 'gcc/ada/i-cpp.adb')
-rw-r--r--gcc/ada/i-cpp.adb7
1 files changed, 2 insertions, 5 deletions
diff --git a/gcc/ada/i-cpp.adb b/gcc/ada/i-cpp.adb
index b54d6d98e9c..387dcb5583c 100644
--- a/gcc/ada/i-cpp.adb
+++ b/gcc/ada/i-cpp.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2002, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2004, 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- --
@@ -32,7 +32,6 @@
------------------------------------------------------------------------------
with Ada.Tags; use Ada.Tags;
-with Interfaces.C; use Interfaces.C;
with System; use System;
with System.Storage_Elements; use System.Storage_Elements;
with Unchecked_Conversion;
@@ -60,10 +59,8 @@ package body Interfaces.CPP is
type Vtable_Entry_Array is array (Positive range <>) of Vtable_Entry;
type VTable is record
- Unused1 : C.short;
- Unused2 : C.short;
- TSD : Type_Specific_Data_Ptr;
Prims_Ptr : Vtable_Entry_Array (Positive);
+ TSD : Type_Specific_Data_Ptr;
end record;
--------------------------------------------------------