From 00b3de222b3bc8eff6fb95219d7aa963b7fd277d Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Wed, 8 Nov 2017 16:22:37 +0000 Subject: spark_xrefs.ads (SPARK_File_Record): Remove string components. 2017-11-08 Piotr Trojanek * spark_xrefs.ads (SPARK_File_Record): Remove string components. * spark_xrefs.adb (dspark): Remove pretty-printing of removed SPARK_File_Record components. * lib-xref-spark_specific.adb (Add_SPARK_File): Do not store string representation of files/units. From-SVN: r254541 --- gcc/ada/spark_xrefs.ads | 7 ------- 1 file changed, 7 deletions(-) (limited to 'gcc/ada/spark_xrefs.ads') diff --git a/gcc/ada/spark_xrefs.ads b/gcc/ada/spark_xrefs.ads index e4f1eef..7ac0901 100644 --- a/gcc/ada/spark_xrefs.ads +++ b/gcc/ada/spark_xrefs.ads @@ -154,13 +154,6 @@ package SPARK_Xrefs is -- entries have been constructed. type SPARK_File_Record is record - File_Name : String_Ptr; - -- Pointer to file name in ALI file - - Unit_File_Name : String_Ptr; - -- Pointer to file name for unit in ALI file, when File_Name refers to a - -- subunit; otherwise null. - File_Num : Nat; -- Dependency number in ALI file -- cgit v1.1