From 2ae4fcfa8708491598a32b5cc0a725d7b2ea3bf8 Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Fri, 8 Jan 2021 13:02:12 +0100 Subject: [Ada] Use function and not procedure UI_Image in pretty-printing gcc/ada/ * pprint.adb (Expr_Name): Simplify with functional variant of UI_Image. --- gcc/ada/pprint.adb | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'gcc') diff --git a/gcc/ada/pprint.adb b/gcc/ada/pprint.adb index 6b8fd8d..4e6f1de 100644 --- a/gcc/ada/pprint.adb +++ b/gcc/ada/pprint.adb @@ -226,8 +226,7 @@ package body Pprint is end; when N_Integer_Literal => - UI_Image (Intval (Expr)); - return UI_Image_Buffer (1 .. UI_Image_Length); + return UI_Image (Intval (Expr)); when N_Real_Literal => return Real_Image (Realval (Expr)); -- cgit v1.1