diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-15 14:00:59 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-11-15 14:00:59 +0000 |
| commit | 8da8c47fb88a704c4fe8d76280f9fb0d93e17afe (patch) | |
| tree | 555048eefe43723b236babb64c91d28adeeaea9f /gcc/ada/namet.h | |
| parent | 26ade8558366ba55ce3ff4b6ae49e7f30b13148e (diff) | |
| download | gcc-8da8c47fb88a704c4fe8d76280f9fb0d93e17afe.tar.gz | |
2005-11-14 Eric Botcazou <ebotcazou@adacore.com>
* namet.h: (Column_Numbe): New type.
(Get_Column_Number): Define to sinput__get_column_number.
(Instantiation): Define to sinput__instantiation.
(Get_Column_Number): Declare.
(Instantiation): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@106992 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/namet.h')
| -rw-r--r-- | gcc/ada/namet.h | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/namet.h b/gcc/ada/namet.h index 15bf1d6a564..59be47af6a7 100644 --- a/gcc/ada/namet.h +++ b/gcc/ada/namet.h @@ -6,7 +6,7 @@ * * * C Header File * * * - * Copyright (C) 1992-2003 Free Software Foundation, Inc. * + * Copyright (C) 1992-2005 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- * @@ -111,15 +111,20 @@ extern Boolean Is_Non_Ada_Error (Entity_Id); /* Here are some functions in sinput.adb we call from a-trans.c. */ typedef Nat Source_File_Index; typedef Int Logical_Line_Number; +typedef Int Column_Number; #define Debug_Source_Name sinput__debug_source_name #define Full_Debug_Name sinput__full_debug_name #define Reference_Name sinput__reference_name #define Get_Source_File_Index sinput__get_source_file_index #define Get_Logical_Line_Number sinput__get_logical_line_number +#define Get_Column_Number sinput__get_column_number +#define Instantiation sinput__instantiation extern File_Name_Type Debug_Source_Name (Source_File_Index); extern File_Name_Type Full_Debug_Name (Source_File_Index); extern File_Name_Type Reference_Name (Source_File_Index); extern Source_File_Index Get_Source_File_Index (Source_Ptr); extern Logical_Line_Number Get_Logical_Line_Number (Source_Ptr); +extern Column_Number Get_Column_Number (Source_Ptr); +extern Source_Ptr Instantiation (Source_File_Index); |