diff options
Diffstat (limited to 'gcc/ada/sprint.adb')
-rw-r--r-- | gcc/ada/sprint.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/sprint.adb b/gcc/ada/sprint.adb index 9d1e37a1016..277ede36059 100644 --- a/gcc/ada/sprint.adb +++ b/gcc/ada/sprint.adb @@ -928,6 +928,7 @@ package body Sprint is Set_Debug_Sloc; Sprint_Bar_List (Choices (Node)); Write_Str (" => "); + if Box_Present (Node) then Write_Str_With_Col_Check ("<>"); else |