From 04292126821fad06d0f13c5faaa46447798dc5a8 Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Mon, 8 Jun 2020 21:21:39 +0200 Subject: [PATCH] [Ada] Small cleanup in interface with GCC back-end gcc/ada/ * fe.h (Is_OK_Static_Expression): Delete. * sem_eval.ads (Is_OK_Static_Expression): Remove WARNING note. --- gcc/ada/fe.h | 2 -- gcc/ada/sem_eval.ads | 2 -- 2 files changed, 4 deletions(-) diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index 463a89c5fdb..8ad16c2b1c9 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -280,10 +280,8 @@ extern Boolean Is_Derived_Type (Entity_Id); /* sem_eval: */ #define Compile_Time_Known_Value sem_eval__compile_time_known_value -#define Is_OK_Static_Expression sem_eval__is_ok_static_expression extern Boolean Compile_Time_Known_Value (Node_Id); -extern Boolean Is_OK_Static_Expression (Node_Id); /* sem_util: */ diff --git a/gcc/ada/sem_eval.ads b/gcc/ada/sem_eval.ads index 97160ee68ac..76e4bdf5d65 100644 --- a/gcc/ada/sem_eval.ads +++ b/gcc/ada/sem_eval.ads @@ -427,8 +427,6 @@ package Sem_Eval is -- for compile time evaluation purposes. Use Compile_Time_Known_Value -- instead (see section on "Compile-Time Known Values" above). - -- WARNING: There is a matching C declaration of this subprogram in fe.h - function Is_OK_Static_Range (N : Node_Id) return Boolean; -- Determines if range is static, as defined in RM 4.9(26), and also checks -- that neither bound of the range raises constraint error, thus ensuring -- 2.30.2