diff options
| author | Ed Schonberg <schonber@gnat.com> | 2001-10-26 01:34:58 +0000 |
|---|---|---|
| committer | Geert Bosch <bosch@gcc.gnu.org> | 2001-10-26 03:34:58 +0200 |
| commit | fef3204ec6f690b5b3eea1fbb782556202804af8 (patch) | |
| tree | a513cc14fb0b4e681e04e4ec9ae0d18d35abf308 /gcc/ada/par-ch3.adb | |
| parent | dfc69d80c186f77231296c99cdf86bd520370a85 (diff) | |
| download | gcc-fef3204ec6f690b5b3eea1fbb782556202804af8.tar.gz | |
par-ch3.adb (P_Subtype_Mark_Resync): for an anonymous array return Error rather than Empty so that analysis can proceed.
* par-ch3.adb (P_Subtype_Mark_Resync): for an anonymous array
return Error rather than Empty so that analysis can proceed.
From-SVN: r46517
Diffstat (limited to 'gcc/ada/par-ch3.adb')
| -rw-r--r-- | gcc/ada/par-ch3.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/par-ch3.adb b/gcc/ada/par-ch3.adb index 937f02d0e7c..211665345e1 100644 --- a/gcc/ada/par-ch3.adb +++ b/gcc/ada/par-ch3.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- $Revision: 1.148 $ +-- $Revision$ -- -- -- Copyright (C) 1992-2001, Free Software Foundation, Inc. -- -- -- @@ -796,7 +796,7 @@ package body Ch3 is if Token = Tok_Array then Error_Msg_SC ("anonymous array definition not allowed here"); Discard_Junk_Node (P_Array_Type_Definition); - return Empty; + return Error; else Type_Node := P_Qualified_Simple_Name_Resync; |