           *******************************************************
                         Report of SPARK Examination
                             Examiner GPL Edition

           *******************************************************


Options:
    index_file=sparkmake.idx
    nowarning_file
    notarget_compiler_data
    config_file=gnat.cfg
    source_extension=ada
    listing_extension=ls_
    nodictionary_file
    report_file=sparkmake.rep
    nohtml
    plain_output
    sparklib
    nostatistics
    fdl_identifiers=accept
    flow_analysis=auto
    language=95
    profile=sequential
    annotation_character=#
    rules=lazy
    error_explanations=off
    justification_option=full
    casing=si
    output_directory=vcg
    output_directory (actual)=vcg

Selected files:
   @sparkmake.smf


Index Filename(s) used were: 
   sparkmake.idx
   ada.idx
   spark.idx
   spark.idx
   main.idx
   errorhandler.idx


Meta File(s) used were:
   sparkmake.smf
      unit.adb
      unitmanager.adb
      tokenmanager.adb
      sparkmakecommandline.adb
      sparkmakeerrors.adb
      sparkmake.adb


Full warning reporting selected


Target configuration file:
Line
      package Standard is
         type Short_Short_Integer is range -128 ..  127;
         type Short_Integer       is range -2**15 .. 2**15 - 1;
         type Integer             is range -2**31 .. 2**31 - 1;
         type Long_Long_Integer   is range -2**63 .. 2**63 - 1;
      end Standard;
      
      package System is
         Min_Int : constant := -2 ** 63;
         Max_Int : constant :=  2 ** 63 - 1;
      end System;


Source Filename(s) used were:
   unit.adb
   unit.ads
   tokenmanager.ads
   stringlist.ads
   sp_symbols.ads
   spark_io.ads
   sparkmakeerrors.ads
   sparkmakedebug.ads
   sparklex.ads
   lextokenmanager.ads
   e_strings.ads
   errorhandler.ads
   dictionary.ads
   commandlinedata.ads
   xmlreport.ads
   version.ads
   filesystem.ads
   examinerconstants.ads
   spark-ada-strings-unbounded.ads
   spark-ada-strings-maps.ads
   ada-characters-handling.shs
   spark-ada-strings.ads
   spark-ada.ads
   spark.ads
   systemerrors.ads
   spark_xml.ads
   screenecho.ads
   statistics.ads
   maths.ads
   lextokenstacks.ads
   contextmanager.ads
   commandlinehandler.ads
   sp_relations.ads
   sp_expected_symbols.ads
   error_types.ads
   error_io.ads
   sp_productions.ads
   lextokenlists.ads
   unitmanager.adb
   unitmanager-unitstore.ads
   unitmanager.ads
   units.ads
   regularexpression.ads
   directory_operations.ads
   tokenmanager.adb
   sparkmakecommandline.adb
   sparkmakecommandline.ads
   commandline.ads
   sparkmakeerrors.adb
   sparkmake.adb



Source Filename:   unit.ads
No Listing File

   Unit name:  Unit
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   tokenmanager.ads
No Listing File

   Unit name:  TokenManager
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   stringlist.ads
No Listing File

   Unit name:  StringList
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
      end StringList;

---        Warning           : 10: The private part of package StringList is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   sp_symbols.ads
No Listing File

   Unit name:  SP_Symbols
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark_io.ads
No Listing File

   Unit name:  SPARK_IO
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

2 error(s) or warning(s)

Line
         pragma Inline (Valid_File, End_Of_Line, End_Of_File, Get_Char);
                ^
---        Warning           :  3: Pragma - ignored by the Examiner.

      end SPARK_IO;

---        Warning           : 10: The private part of package SPARK_IO is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   sparkmakeerrors.ads
No Listing File

   Unit name:  SparkMakeErrors
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparkmakedebug.ads
No Listing File

   Unit name:  SparkMakeDebug
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparklex.ads
No Listing File

   Unit name:  SparkLex
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   lextokenmanager.ads
No Listing File

   Unit name:  LexTokenManager
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   e_strings.ads
No Listing File

   Unit name:  E_Strings
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   errorhandler.ads
No Listing File

   Unit name:  ErrorHandler
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
      pragma Elaborate_All (SPARK_IO);
             ^
---        Warning           :  3: Pragma - ignored by the Examiner.


Source Filename:   dictionary.ads
No Listing File

   Unit name:  Dictionary
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   commandlinedata.ads
No Listing File

   Unit name:  CommandLineData
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   xmlreport.ads
No Listing File

   Unit name:  XMLReport
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   version.ads
No Listing File

   Unit name:  Version
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Warn   3         end  Pragma to suppress compiler warn    1      



Source Filename:   filesystem.ads
No Listing File

   Unit name:  FileSystem
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   examinerconstants.ads
No Listing File

   Unit name:  ExaminerConstants
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark-ada-strings-unbounded.ads
No Listing File

   Unit name:  SPARK.Ada.Strings.Unbounded
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

2 error(s) or warning(s)

Line
      with Ada.Strings.Unbounded;
           ^
---        Warning           :  1: The identifier Ada is either undeclared or not 
           visible at this point.

      end SPARK.Ada.Strings.Unbounded;

---        Warning           : 10: The private part of package Unbounded is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   spark-ada-strings-maps.ads
No Listing File

   Unit name:  SPARK.Ada.Strings.Maps
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

2 error(s) or warning(s)

Line
      with Ada.Strings.Maps;
           ^
---        Warning           :  1: The identifier Ada is either undeclared or not 
           visible at this point.

      end SPARK.Ada.Strings.Maps;

---        Warning           : 10: The private part of package Maps is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   ada-characters-handling.shs
No Listing File

   Unit name:  Ada.Characters.Handling
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark-ada-strings.ads
No Listing File

   Unit name:  SPARK.Ada.Strings
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark-ada.ads
No Listing File

   Unit name:  SPARK.Ada
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark.ads
No Listing File

   Unit name:  SPARK
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   systemerrors.ads
No Listing File

   Unit name:  SystemErrors
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   spark_xml.ads
No Listing File

   Unit name:  SPARK_XML
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   screenecho.ads
No Listing File

   Unit name:  ScreenEcho
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   statistics.ads
No Listing File

   Unit name:  Statistics
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   maths.ads
No Listing File

   Unit name:  Maths
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

3 error(s) or warning(s)

Line
         pragma Inline (HasNoValue);
                ^
---        Warning           :  3: Pragma - ignored by the Examiner.

         for Digit'Size use 4;
             ^
---        Warning           :  2: Representation clause - ignored by the Examiner.

         pragma Pack (ValueArray);
                ^
---        Warning           :  3: Pragma - ignored by the Examiner.


Source Filename:   lextokenstacks.ads
No Listing File

   Unit name:  LexTokenStacks
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   contextmanager.ads
No Listing File

   Unit name:  ContextManager
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   commandlinehandler.ads
No Listing File

   Unit name:  CommandLineHandler
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sp_relations.ads
No Listing File

   Unit name:  SP_Relations
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sp_expected_symbols.ads
No Listing File

   Unit name:  SP_Expected_Symbols
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   error_types.ads
No Listing File

   Unit name:  Error_Types
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   error_io.ads
No Listing File

   Unit name:  Error_IO
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
      end Error_IO;

---        Warning           : 10: The private part of package Error_IO is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   sp_productions.ads
No Listing File

   Unit name:  SP_Productions
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   lextokenlists.ads
No Listing File

   Unit name:  LexTokenLists
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   unitmanager-unitstore.ads
No Listing File

   Unit name:  UnitManager.UnitStore
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   unitmanager.ads
No Listing File

   Unit name:  UnitManager
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   units.ads
No Listing File

   Unit name:  Units
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
      end Units;

---        Warning           : 10: The private part of package Units is hidden - 
           hidden text is ignored by the Examiner.


Source Filename:   regularexpression.ads
No Listing File

   Unit name:  RegularExpression
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   directory_operations.ads
No Listing File

   Unit name:  Directory_Operations
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparkmakecommandline.ads
No Listing File

   Unit name:  SparkMakeCommandLine
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   commandline.ads
No Listing File

   Unit name:  CommandLine
   Unit type:  package specification
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   unit.adb
Listing Filename:  unit.lsb

   Unit name:  Unit
   Unit type:  package body
   Unit has been analysed, any errors are listed below.

4 error(s) or warning(s)

Line
      with E_Strings.Not_SPARK;
                     ^
---        Warning           :  1: The identifier Not_SPARK is either undeclared or 
           not visible at this point.

            end Output_Unexpected_Token;

---        Warning           : 10: The body of subprogram Output_Unexpected_Token is 
           hidden - hidden text is ignored by the Examiner.

         end Output_Object;

---        Warning           : 10: The body of subprogram Output_Object is hidden - 
           hidden text is ignored by the Examiner.

         end Output_Id;

---        Warning           : 10: The body of subprogram Output_Id is hidden - 
           hidden text is ignored by the Examiner.


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Flow  10              Closed file handle not used         1      



Source Filename:   unitmanager.adb
Listing Filename:  unitmanager.lsb

   Unit name:  UnitManager
   Unit type:  package body
   Unit has been analysed, any errors are listed below.

18 error(s) or warning(s)

Line
            while Success and not StringList.Is_Null (It => Directory_It) loop

---        Warning           :402: Default assertion planted to cut loop.

               while Success and not StringList.Is_Null (It => Include_It) loop

---        Warning           :402: Default assertion planted to cut loop.

                  while Success and not StringList.Is_Null (It => File_It) loop

---        Warning           :402: Default assertion planted to cut loop.

                        while not StringList.Is_Null (It => Exclude_It) loop

---        Warning           :402: Default assertion planted to cut loop.

            while not Units.IsEmpty (All_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

                  while Result.The_Kind /= Unit.Package_Body_Unit loop

---        Warning           :402: Default assertion planted to cut loop.

                  while Parent_Unit /= Unit.Null_Id loop

---        Warning           :402: Default assertion planted to cut loop.

               while not StringList.Is_Null (It => It) loop

---        Warning           :402: Default assertion planted to cut loop.

               while not StringList.Is_Null (It => It) loop

---        Warning           :402: Default assertion planted to cut loop.

            while not Units.IsEmpty (The_Withed_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

               while Parent_Unit /= Unit.Null_Id loop

---        Warning           :402: Default assertion planted to cut loop.

            while not Units.IsEmpty (All_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

               while not Units.IsEmpty (The_Withed_Components) loop

---        Warning           :402: Default assertion planted to cut loop.

               while not Units.IsEmpty (The_Withed_Components) loop

---        Warning           :402: Default assertion planted to cut loop.

            while not Units.IsEmpty (All_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

               while not Found and not Units.IsEmpty (Other_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

                  while not Found and not Units.IsEmpty (Req_Units) loop

---        Warning           :402: Default assertion planted to cut loop.

            while not Units.IsEmpty (All_Units) loop

---        Warning           :402: Default assertion planted to cut loop.


Source Filename:   tokenmanager.adb
Listing Filename:  tokenmanager.lsb

   Unit name:  TokenManager
   Unit type:  package body
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
         end To_String;

---        Warning           : 10: The body of subprogram To_String is hidden - 
           hidden text is ignored by the Examiner.


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Flow  10              Ineffective assignment OK           1      
Flow  10              Ineffective assignment OK           1      
Flow  33         end  Unused not references OK            1      
Flow  10              Ineffective assignment OK           1      
Flow  33         end  Unused not references OK            1      



Source Filename:   sparkmakecommandline.adb
Listing Filename:  sparkmakecommandline.lsb

   Unit name:  SparkMakeCommandLine
   Unit type:  package body
   Unit has been analysed, any errors are listed below.

8 error(s) or warning(s)

Line
         end Report_Usage;

---        Warning           : 10: The body of subprogram Report_Usage is hidden - 
           hidden text is ignored by the Examiner.

         end Report_Version;

---        Warning           : 10: The body of subprogram Report_Version is hidden - 
           hidden text is ignored by the Examiner.

                  CommandLineData.Content.Language_Profile := CommandLineData.SPARK83;
                  ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.Language_Profile, which is an own variable 
           of a non-enclosing package.

                  CommandLineData.Content.Language_Profile := CommandLineData.SPARK95;
                  ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.Language_Profile, which is an own variable 
           of a non-enclosing package.

                  CommandLineData.Content.Language_Profile := CommandLineData.SPARK2005;
                  ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.Language_Profile, which is an own variable 
           of a non-enclosing package.

                  CommandLineData.Content.Anno_Char := E_Strings.Get_Element (E_Str => Arg,
                  ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.Anno_Char, which is an own variable of a 
           non-enclosing package.

            CommandLineData.Content.Language_Profile := CommandLineData.SPARK95;
            ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.Language_Profile, which is an own variable 
           of a non-enclosing package.

            CommandLineData.Content.FDL_Reserved := False;
            ^
---        Warning           :169: Direct update of own variable 
           CommandLineData.Content.FDL_Reserved, which is an own variable of a 
           non-enclosing package.


Source Filename:   sparkmakeerrors.adb
Listing Filename:  sparkmakeerrors.lsb

   Unit name:  SparkMakeErrors
   Unit type:  package body
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
         end Fatal;

---        Warning           : 10: The body of subprogram Fatal is hidden - hidden 
           text is ignored by the Examiner.


Source Filename:   sparkmake.adb
Listing Filename:  sparkmake.lsb

   Unit name:  Sparkmake
   Unit type:  main program
   Unit has been analysed, any errors are listed below.

5 error(s) or warning(s)

Line
      with Ada.Exceptions;
           ^
---        Warning           :  1: The identifier Ada is either undeclared or not 
           visible at this point.

      with GNAT.Traceback.Symbolic;
           ^
---        Warning           :  1: The identifier GNAT is either undeclared or not 
           visible at this point.

      with ScreenEcho;
           ^
---        Warning           :  1: The identifier ScreenEcho is either undeclared or 
           not visible at this point.

         end Make;

---        Warning           : 10: The body of subprogram Make is hidden - hidden 
           text is ignored by the Examiner.

      end Sparkmake;

---        Warning           :  9: The body of subprogram Sparkmake has a hidden 
           exception handler - analysis and verification of contracts for this 
           handler have not been performed.


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Flow  10         end  Ineffective assignment here OK      1      
Flow  10              Ineffective assignment here OK      1      
Flow  33         end  Metafile not referenced here        1      


Note: Automatic flow analysis mode selected


--End of file--------------------------------------------------
