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

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


Options:
    index_file=sparkformat.idx
    nowarning_file
    notarget_compiler_data
    config_file=gnat.cfg
    source_extension=ada
    listing_extension=ls_
    nodictionary_file
    report_file=sparkformat.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:
   @sparkformat.smf


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


Meta File(s) used were:
   sparkformat.smf
      sparkformatcommandlinedata.adb
      sparkformatcommandlinehandler.adb
      sparkprogram.adb
      sparkprogram-iteration.adb
      sparkprogram-annotations.adb
      sparkprogram-reformatter.adb
      sparkprogram-reformatter-simplelex.adb
      sparkformat.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:
   sparkformatcommandlinedata.adb
   sparkformatcommandlinedata.ads
   filesystem.ads
   e_strings.ads
   examinerconstants.ads
   spark_io.ads
   spark-ada-strings-unbounded.ads
   spark-ada-strings-maps.ads
   ada-characters-handling.shs
   spark-ada-strings.ads
   spark-ada.ads
   spark.ads
   sparkformatcommandlinehandler.adb
   sparkformatcommandlinehandler.ads
   screenecho.ads
   commandlinehandler.ads
   commandlinedata.ads
   xmlreport.ads
   version.ads
   systemerrors.ads
   spark_xml.ads
   sparkprogram.adb
   sparkprogram.ads
   statistics.ads
   sp_symbols.ads
   sparklex.ads
   seqalgebra.ads
   relationalgebra.ads
   lextokenmanager-seq_algebra.ads
   lextokenmanager-relation_algebra-string.ads
   lextokenmanager-relation_algebra.ads
   lextokenmanager.ads
   heap.ads
   errorhandler.ads
   dictionary.ads
   maths.ads
   lextokenstacks.ads
   contextmanager.ads
   sp_relations.ads
   sp_expected_symbols.ads
   error_types.ads
   error_io.ads
   sp_productions.ads
   heap_storage.ads
   spark-ada-containers.ads
   lextokenlists.ads
   sparkprogram-iteration.adb
   sparkprogram-annotations.adb
   sparkprogram-reformatter.adb
   sparkprogram-reformatter-simplelex.adb
   sparkformat.adb



Source Filename:   sparkformatcommandlinedata.ads
No Listing File

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

No errors found


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:   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:   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_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:   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:   sparkformatcommandlinehandler.ads
No Listing File

   Unit name:  SparkFormatCommandLineHandler
   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:   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:   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:   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:   sparkprogram.ads
No Listing File

   Unit name:  SPARKProgram
   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:   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:   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:   seqalgebra.ads
No Listing File

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

No errors found


Source Filename:   relationalgebra.ads
No Listing File

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

No errors found


Source Filename:   lextokenmanager-seq_algebra.ads
No Listing File

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

No errors found


Source Filename:   lextokenmanager-relation_algebra-string.ads
No Listing File

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

No errors found


Source Filename:   lextokenmanager-relation_algebra.ads
No Listing File

   Unit name:  LexTokenManager.Relation_Algebra
   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:   heap.ads
No Listing File

   Unit name:  Heap
   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:   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:   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:   heap_storage.ads
No Listing File

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

3 error(s) or warning(s)

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

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

      end Heap_Storage;

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


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

   Unit name:  SPARK.Ada.Containers
   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:   sparkformatcommandlinedata.adb
Listing Filename:  sparkformatcommandlinedata.lsb

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

No errors found


Source Filename:   sparkformatcommandlinehandler.adb
Listing Filename:  sparkformatcommandlinehandler.lsb

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

92 error(s) or warning(s)

Line
                                       SparkFormatCommandLineData.Content.Valid := not Add_Modes_Found;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                       SparkFormatCommandLineData.Content.Add_Modes := True;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Add_Modes, which is an own 
           variable of a non-enclosing package.

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

                                       SparkFormatCommandLineData.Content.Valid := Opt_Val_OK
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

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

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

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

                                       SparkFormatCommandLineData.Content.Valid := not Compress_Found;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                       SparkFormatCommandLineData.Content.Operation := SparkFormatCommandLineData.Compress;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Operation, which is an own 
           variable of a non-enclosing package.

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

                                          SparkFormatCommandLineData.Content.Valid              := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Constituent_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Constituent_Indent, which is an 
           own variable of a non-enclosing package.

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

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

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

                                 SparkFormatCommandLineData.Content.Valid := Opt_Val_OK and then not Default_Function_Mode_Found;
                                 ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                             SparkFormatCommandLineData.Content.Default_Function_Mode := SparkFormatCommandLineData.In_Mode;
                                             ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Default_Function_Mode, which is 
           an own variable of a non-enclosing package.

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

                                             SparkFormatCommandLineData.Content.Default_Function_Mode := SparkFormatCommandLineData.Unmoded;
                                             ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Default_Function_Mode, which is 
           an own variable of a non-enclosing package.

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

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

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

                                       SparkFormatCommandLineData.Content.Valid := not Expand_Found;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                       SparkFormatCommandLineData.Content.Operation := SparkFormatCommandLineData.Expand;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Operation, which is an own 
           variable of a non-enclosing package.

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

                                             SparkFormatCommandLineData.Content.Valid          := True;
                                             ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                             SparkFormatCommandLineData.Content.Exclude_Export := Opt_Val;
                                             ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Exclude_Export, which is an own 
           variable of a non-enclosing package.

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

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

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

                                          SparkFormatCommandLineData.Content.Valid         := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Export_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Export_Indent, which is an own 
           variable of a non-enclosing package.

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

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

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

                                    SparkFormatCommandLineData.Content.Valid         := True;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                    SparkFormatCommandLineData.Content.Global_Indent := Indent_Val;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Global_Indent, which is an own 
           variable of a non-enclosing package.

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

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

                                 SparkFormatCommandLineData.Content.Valid := not Help_Found;
                                 ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                 SparkFormatCommandLineData.Content.Help := True;
                                 ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Help, which is an own variable of 
           a non-enclosing package.

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

                                          SparkFormatCommandLineData.Content.Valid          := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Inherit_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Inherit_Indent, which is an own 
           variable of a non-enclosing package.

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

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

                                          SparkFormatCommandLineData.Content.Valid                 := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Initialization_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Initialization_Indent, which is 
           an own variable of a non-enclosing package.

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

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

                                          SparkFormatCommandLineData.Content.Valid         := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Import_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Import_Indent, which is an own 
           variable of a non-enclosing package.

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

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

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

                                       SparkFormatCommandLineData.Content.Valid := not Add_Modes_Found;
                                       ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

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

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

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

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

                                                   SparkFormatCommandLineData.Content.Valid := not Alphabetic_Ordering_Found;
                                                   ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

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

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

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

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

                                          SparkFormatCommandLineData.Content.Valid      := True;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                          SparkFormatCommandLineData.Content.Own_Indent := Indent_Val;
                                          ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Own_Indent, which is an own 
           variable of a non-enclosing package.

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

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

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

                                    SparkFormatCommandLineData.Content.Valid             := True;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                    SparkFormatCommandLineData.Content.Properties_Indent := Indent_Val;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Properties_Indent, which is an 
           own variable of a non-enclosing package.

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

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

                                    SparkFormatCommandLineData.Content.Valid             := True;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                    SparkFormatCommandLineData.Content.Refinement_Indent := Indent_Val;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Refinement_Indent, which is an 
           own variable of a non-enclosing package.

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

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

                                    SparkFormatCommandLineData.Content.Valid            := True;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                    SparkFormatCommandLineData.Content.Separator_Indent := Indent_Val;
                                    ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Separator_Indent, which is an own 
           variable of a non-enclosing package.

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

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

                                 SparkFormatCommandLineData.Content.Valid := not Version_Found;
                                 ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Valid, which is an own variable 
           of a non-enclosing package.

                                 SparkFormatCommandLineData.Content.Version := True;
                                 ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Version, which is an own variable 
           of a non-enclosing package.

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

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

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

                           SparkFormatCommandLineData.Content.Number_Source := SparkFormatCommandLineData.Content.Number_Source + 1;
                           ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Number_Source, which is an own 
           variable of a non-enclosing package.

                           SparkFormatCommandLineData.Content.Source_File_List (SparkFormatCommandLineData.Content.Number_Source).
                           ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Source_File_List, which is an own 
           variable of a non-enclosing package.

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

                  SparkFormatCommandLineData.Content.Number_Source := 0;
                  ^
---        Warning           :169: Direct update of own variable 
           SparkFormatCommandLineData.Content.Number_Source, which is an own 
           variable of a non-enclosing package.

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


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Flow  10              We don't care if we found anythi    1      
Flow  33         end  And we don't tell anyone about i    1      
Flow  22              Simulation of conditional compil    1      



Source Filename:   sparkprogram.adb
Listing Filename:  sparkprogram.lsb

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

2 error(s) or warning(s)

Line
               pragma Unreferenced (Is_End); -- for future use
                      ^
---        Warning           :  3: Pragma - ignored by the Examiner.

               pragma Unreferenced (Is_End); -- for future use
                      ^
---        Warning           :  3: Pragma - ignored by the Examiner.


Expected messages marked with the accept annotation
Type Msg    Lines              Reason                    Match
     No.  From    To                                    No.  Line
Flow  10         end  The variable Unused is not requi    1      
Flow  33         end  The variable Unused is not requi    1      
Flow  10         end  The variable Unused is not requi    1      
Flow  33         end  The variable Unused is not requi    1      
Flow  10         end  The variable Unused is not requi    1      
Flow  33         end  The variable Unused is not requi    1      
Flow  10         end  The variable Unused is not requi    1      
Flow  33         end  The variable Unused is not requi    1      
Flow  41              Used to simplify loop structure     1      
Flow  10              The next symbol should be 'deriv    1      
Flow 602         end  Start_Col may not be set if not     1      
Flow  10              Final value of Index is not requ    1      
Flow  10              The next symbol should be 'globa    1      
Flow 602         end  Start_Col may not be set if not     1      
Flow  10              There is no globals list, so no     1      
Flow  10              Not used when both global and de    1      
Flow  10              If both globals and derives list    1      
Flow  10              The state variable has been 'dis    1      
Flow  10              The state variable has been 'dis    1      
Flow  10              The state variable has been 'dis    1      



Source Filename:   sparkprogram-iteration.adb
Listing Filename:  sparkprogram-iteration.lsb

   Unit name:  SPARKProgram.Iteration
   Unit type:  subunit
   Unit has been analysed, any errors are listed below.

1 error(s) or warning(s)

Line
               exit when LexTokenManager.Seq_Algebra.Is_Null_Member (M => ThisMember);

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


Source Filename:   sparkprogram-annotations.adb
Listing Filename:  sparkprogram-annotations.lsb

   Unit name:  SPARKProgram.Annotations
   Unit type:  subunit
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparkprogram-reformatter.adb
Listing Filename:  sparkprogram-reformatter.lsb

   Unit name:  SPARKProgram.Reformatter
   Unit type:  subunit
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparkprogram-reformatter-simplelex.adb
Listing Filename:  sparkprogram-reformatter-simplelex.lsb

   Unit name:  SPARKProgram.Reformatter.SimpleLex
   Unit type:  subunit
   Unit has been analysed, any errors are listed below.

No errors found


Source Filename:   sparkformat.adb
Listing Filename:  sparkformat.lsb

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

7 error(s) or warning(s)

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

      with Ada.Command_Line;
           ^
---        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 Print_Help;

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

         end Print_Version;

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

      end SPARKFormat;

---        Warning           :  9: The body of subprogram SPARKFormat 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
Warn 169              Direct update OK here.              1      
Warn 169              Direct update OK here.              1      
Flow  10              Status is ignored                   1      
Flow  10              Status is ignored                   1      
Flow  10              File 'Input'  is closed             1      
Flow  10              Status is ignored                   1      


Note: Automatic flow analysis mode selected


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