@@ -601,7 +601,7 @@
Loading
601 601
   Language             := Get_String_Name ("aadl");
602 602
   Default_AADL_Version := Get_Default_AADL_Version;
603 603
   AADL_Version         := Default_AADL_Version;
604 -
604 +
   SCM_Version          := new String'(Ocarina_Revision);
605 605
   --  Process the command line
606 606
607 607
   Ocarina.Cmd_Line.Process;

@@ -1482,7 +1482,8 @@
Loading
1482 1482
               Write_Line
1483 1483
                 ("# This Makefile has been generated automatically  #");
1484 1484
               Write_Line
1485 -
                 ("# by the Ocarina AADL toolsuite.                  #");
1485 +
                 ("# by the Ocarina AADL toolsuite                   #");
1486 +
               Write_Line ("# " & SCM_Version.all & ". #");
1486 1487
               Write_Line
1487 1488
                 ("# Do not edit this file, all your changes will    #");
1488 1489
               Write_Line
@@ -1584,7 +1585,8 @@
Loading
1584 1585
1585 1586
            Write_Line ("###################################################");
1586 1587
            Write_Line ("# This Makefile has been generated automatically  #");
1587 -
            Write_Line ("# by the Ocarina AADL toolsuite.                  #");
1588 +
            Write_Line ("# by the Ocarina AADL toolsuite                   #");
1589 +
            Write_Line ("# " & SCM_Version.all & ". #");
1588 1590
            Write_Line ("# Do not edit this file, all your changes will    #");
1589 1591
            Write_Line ("# be overridden at the next code generation.      #");
1590 1592
            Write_Line ("###################################################");
@@ -1761,7 +1763,8 @@
Loading
1761 1763
1762 1764
            Write_Line ("###################################################");
1763 1765
            Write_Line ("# This Makefile has been generated automatically  #");
1764 -
            Write_Line ("# by the Ocarina AADL toolsuite.                  #");
1766 +
            Write_Line ("# by the Ocarina AADL toolsuite                   #");
1767 +
            Write_Line ("# " & SCM_Version.all & ". #");
1765 1768
            Write_Line ("# Do not edit this file, all your changes will    #");
1766 1769
            Write_Line ("# be overridden at the next code generation.      #");
1767 1770
            Write_Line ("###################################################");
@@ -2946,7 +2949,8 @@
Loading
2946 2949
            Write_Line
2947 2950
              ("-- This project file has been generated automatically --");
2948 2951
            Write_Line
2949 -
              ("-- by the Ocarina AADL toolsuite.                     --");
2952 +
              ("-- by the Ocarina AADL toolsuite                      --");
2953 +
            Write_Line ("-- " & SCM_Version.all & " --");
2950 2954
            Write_Line
2951 2955
              ("-- Do not edit this file since all your changes will  --");
2952 2956
            Write_Line

@@ -6,7 +6,7 @@
Loading
6 6
--                                                                          --
7 7
--                                 B o d y                                  --
8 8
--                                                                          --
9 +
--    Copyright (C) 2006-2009 Telecom ParisTech, 2010-2020 ESA & ISAE.      --
9 10
--                                                                          --
10 11
-- Ocarina  is free software; you can redistribute it and/or modify under   --
11 12
-- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -2433,6 +2433,11 @@
Loading
2433 2433
      N := Make_Ada_Comment (Name_Find);
2434 2434
      Append_Node_To_List (N, Package_Header);
2435 2435
2436 +
      Set_Str_To_Name_Buffer
2437 +
        (SCM_Version.all);
2438 +
      N := Make_Ada_Comment (Name_Find);
2439 +
      Append_Node_To_List (N, Package_Header);
2440 +
2436 2441
      Set_Str_To_Name_Buffer
2437 2442
        ("Do NOT hand-modify this file, as your             --");
2438 2443
      N := Make_Ada_Comment (Name_Find);

@@ -6,7 +6,7 @@
Loading
6 6
--                                                                          --
7 7
--                                 B o d y                                  --
8 8
--                                                                          --
9 +
--    Copyright (C) 2008-2009 Telecom ParisTech, 2010-2020 ESA & ISAE.      --
9 10
--                                                                          --
10 11
-- Ocarina  is free software; you can redistribute it and/or modify under   --
11 12
-- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -921,6 +921,11 @@
Loading
921 921
      N := Make_C_Comment (Name_Find);
922 922
      Append_Node_To_List (N, Header);
923 923
924 +
      Set_Str_To_Name_Buffer
925 +
        (SCM_Version.all);
926 +
      N := Make_C_Comment (Name_Find);
927 +
      Append_Node_To_List (N, Header);
928 +
924 929
      Set_Str_To_Name_Buffer
925 930
        ("Do NOT hand-modify this file, as your            ");
926 931
      N := Make_C_Comment (Name_Find);
Files Coverage
src 64.81%
Project Totals (377 files) 64.81%
341.2
TRAVIS_OS_NAME=osx
341.1
TRAVIS_OS_NAME=linux
1
ignore:
2
  - "tools/mknodes"
3
  - "src/transfo"
4
  - "doc"
Sunburst
The inner-most circle is the entire project, moving away from the center are folders then, finally, a single file. The size and color of each slice is representing the number of statements and the coverage, respectively.
Icicle
The top section represents the entire project. Proceeding with folders and finally individual files. The size and color of each slice is representing the number of statements and the coverage, respectively.
Grid
Each block represents a single file in the project. The size and color of each block is represented by the number of statements and the coverage, respectively.
Loading