From 17ce258e9fd726e34b921ada7281013f47fa339d Mon Sep 17 00:00:00 2001 From: Reto Buerki Date: Mon, 14 Jun 2021 15:05:54 +0200 Subject: [PATCH] Do not exclude private subprograms from skeleton Closes #16. This restores the behavior of the ASIS-based gnattest variant. Also, this is very helpful for testing private functionality of a package, without making the actual subprograms public. --- src/test-skeleton.adb | 4 ---- 1 file changed, 4 deletions(-) diff --git a/src/test-skeleton.adb b/src/test-skeleton.adb index f1309926..a26426f9 100755 --- a/src/test-skeleton.adb +++ b/src/test-skeleton.adb @@ -1290,10 +1290,6 @@ package body Test.Skeleton is return Over; end if; - if Node.Kind = Ada_Private_Part then - return Over; - end if; - if Node.Kind = Ada_Generic_Formal_Part then return Over; end if;