diff -Nru adadesigner-0.25/adadesigner.gpr adadesigner-0.27/adadesigner.gpr --- adadesigner-0.25/adadesigner.gpr 2009-02-01 21:28:49.000000000 +0000 +++ adadesigner-0.27/adadesigner.gpr 2011-02-20 11:47:33.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- GNATGPR is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with GNAT; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ with "asis.gpr"; diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/adadesigner.adb adadesigner-0.27/c_AdaDesigner_Core/sources/adadesigner.adb --- adadesigner-0.25/c_AdaDesigner_Core/sources/adadesigner.adb 2009-10-15 22:46:09.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/adadesigner.adb 2011-02-20 19:44:55.000000000 +0000 @@ -3,19 +3,22 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- --- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- +-- -- +------------------------------------------------------------------------------ -- -- #5927: Add exception information in adadesigner main exception handling info. -- @@ -85,7 +88,8 @@ begin -- Step 1 : link Asis compilation unit name to the GPR source file name - Unit_Information.Unit_File_Name := To_Unbounded_String (Asis_Compilation_Unit_File_Name); + Unit_Information.Unit_File_Name + := To_Unbounded_String ((Ada.Characters.Handling.To_Lower (Asis_Compilation_Unit_File_Name))); Position := Sources_Container.Find (Item => Unit_Information); if Asis.Compilation_Units.Is_Nil (Compilation_Unit) then @@ -278,9 +282,9 @@ case Action is when Help => Help_Options; - User_Message ("Copyright (C) 2007-2009 David Sauvage."); + User_Message ("Copyright (C) 2007-2011, AdaLabs Ltd. http://adalabs.com"); User_Message ("This software is covered by the GNU General Public License."); - User_Message ("https://gna.org/projects/adadesigner/"); + User_Message ("http://adalabs.com/products-adadesigner.html"); when Version => User_Message ("adadesigner version : " & Version_AdaDesigner.K_Version); when Filter => diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer.ads adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer.ads --- adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer.ads 2011-02-20 11:46:27.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ package Ada_Designer is diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer-compilation_units.adb adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer-compilation_units.adb --- adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer-compilation_units.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer-compilation_units.adb 2011-02-20 11:46:35.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ --Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer-compilation_units.ads adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer-compilation_units.ads --- adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer-compilation_units.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer-compilation_units.ads 2011-02-20 11:46:32.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Asis diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer_dd.adb adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer_dd.adb --- adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer_dd.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer_dd.adb 2011-02-20 11:46:23.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer_dd.ads adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer_dd.ads --- adadesigner-0.25/c_AdaDesigner_Core/sources/ada_designer_dd.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/ada_designer_dd.ads 2011-02-20 11:46:22.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/process_unit_analysis.adb adadesigner-0.27/c_AdaDesigner_Core/sources/process_unit_analysis.adb --- adadesigner-0.25/c_AdaDesigner_Core/sources/process_unit_analysis.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/process_unit_analysis.adb 2011-02-20 11:46:18.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ --Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Core/sources/version_adadesigner.ads adadesigner-0.27/c_AdaDesigner_Core/sources/version_adadesigner.ads --- adadesigner-0.25/c_AdaDesigner_Core/sources/version_adadesigner.ads 2009-10-15 22:52:29.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Core/sources/version_adadesigner.ads 2011-02-20 20:14:56.000000000 +0000 @@ -1,25 +1,50 @@ +-- -- +------------------------------------------------------------------------------ +-- AdaDesigner -- +------------------------------------------------------------------------------ +-- -- +------------------------------------------------------------------------------ +-- -- +------------------------------------------------------------------------------ +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- +------------------------------------------------------------------------------ +-- -- +------------------------------------------------------------------------------ +-- http://adalabs.com -- +------------------------------------------------------------------------------ +-- -- +------------------------------------------------------------------------------ +-- AdaDesigner is free software; you can redistribute it and/or modify it under -- +------------------------------------------------------------------------------ +-- terms of the GNU General Public License as published by the Free Soft- -- +------------------------------------------------------------------------------ +-- ware Foundation; either version 2, or (at your option) any later ver- -- +------------------------------------------------------------------------------ +-- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- +------------------------------------------------------------------------------ +-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- +------------------------------------------------------------------------------ +-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- +------------------------------------------------------------------------------ +-- for more details. You should have received a copy of the GNU General -- +------------------------------------------------------------------------------ +-- Public License distributed with AdaDesigner; see file COPYING. If not, write -- +------------------------------------------------------------------------------ +-- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- +------------------------------------------------------------------------------ +-- Boston, MA 02110-1301, USA. -- +------------------------------------------------------------------------------ +-- -- +------------------------------------------------------------------------------ +------------------------------------------------------------------------------ +------------------------------------------------------------------------------ +-- This is a generated file +------------------------------------------------------------------------------ +package Version_AdaDesigner is +------------------------------------------------------------------------------ + -- 20110221-0014 +------------------------------------------------------------------------------ + K_Version : constant String := "0.27"; +------------------------------------------------------------------------------ +end Version_AdaDesigner; ------------------------------------------------------------------------------ - -- -- - -- AdaDesigner -- - -- -- - -- -- - -- Copyright (C) 2007-2008, David Sauvage. -- - -- -- - -- AdaDesigner is free software; you can redistribute it and/or modify it under -- - -- terms of the GNU General Public License as published by the Free Soft- -- - -- ware Foundation; either version 2, or (at your option) any later ver- -- - -- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- - -- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- - -- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- - -- for more details. You should have received a copy of the GNU General -- - -- Public License distributed with AdaDesigner; see file COPYING. If not, write -- - -- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- - -- Boston, MA 02110-1301, USA. -- - -- -- - ------------------------------------------------------------------------------ - -- This is a generated file - package Version_AdaDesigner is - -- 20091016-0052 - K_Version : constant String := "0.25"; - end Version_AdaDesigner; - diff -Nru adadesigner-0.25/c_AdaDesigner_Filters/sources/dot_processor.adb adadesigner-0.27/c_AdaDesigner_Filters/sources/dot_processor.adb --- adadesigner-0.25/c_AdaDesigner_Filters/sources/dot_processor.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Filters/sources/dot_processor.adb 2011-02-20 19:44:54.000000000 +0000 @@ -3,22 +3,21 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- +-- -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- --- --- --- --- ------------------------------------------------------------------------------ -- Ada with Ada.Text_IO, @@ -672,7 +671,7 @@ Digraph.Subgraphs.Append (Create (Lines)); Lines.Clear; elsif Get_Token /= End_Token and Get_Token /= Link then - while Get_Token /= Link loop + while Get_Token /= Link and Get_Token /= End_Token loop if Get_Token /= Invisible_Link and Get_Token /= Rank and Get_Token /= End_Token then Lines.Append (Current_Line); diff -Nru adadesigner-0.25/c_AdaDesigner_Filters/sources/dot_processor.ads adadesigner-0.27/c_AdaDesigner_Filters/sources/dot_processor.ads --- adadesigner-0.25/c_AdaDesigner_Filters/sources/dot_processor.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Filters/sources/dot_processor.ads 2011-02-20 11:50:06.000000000 +0000 @@ -3,22 +3,21 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- +-- -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- --- --- --- --- ------------------------------------------------------------------------------ --Ada with Ada.Containers.Vectors, diff -Nru adadesigner-0.25/c_AdaDesigner_Options/sources/adadesigner_options.adb adadesigner-0.27/c_AdaDesigner_Options/sources/adadesigner_options.adb --- adadesigner-0.25/c_AdaDesigner_Options/sources/adadesigner_options.adb 2009-05-09 14:13:00.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Options/sources/adadesigner_options.adb 2011-02-20 11:50:06.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Options/sources/adadesigner_options.ads adadesigner-0.27/c_AdaDesigner_Options/sources/adadesigner_options.ads --- adadesigner-0.25/c_AdaDesigner_Options/sources/adadesigner_options.ads 2009-05-09 14:13:00.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Options/sources/adadesigner_options.ads 2011-02-20 11:50:05.000000000 +0000 @@ -1,20 +1,22 @@ ------------------------------------------------------------------------------ -- -- --- AdaDesigner -- +-- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Statistics/sources/ada_designer_stat.adb adadesigner-0.27/c_AdaDesigner_Statistics/sources/ada_designer_stat.adb --- adadesigner-0.25/c_AdaDesigner_Statistics/sources/ada_designer_stat.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Statistics/sources/ada_designer_stat.adb 2011-02-20 19:41:36.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ --Ada @@ -340,7 +342,7 @@ Ada.Text_IO.Put_Line (File, "digraph factory {"); Ada.Text_IO.Put_Line (File, " graph [label=""" & Ada.Characters.Handling.To_Upper (To_String (Statistic_File_Name)) & - " Sofware Design " & + " Software Design " & " " & Ada.Calendar.Formatting.Image (Ada.Calendar.Clock) & " Analysis level :" & diff -Nru adadesigner-0.25/c_AdaDesigner_Statistics/sources/ada_designer_stat.ads adadesigner-0.27/c_AdaDesigner_Statistics/sources/ada_designer_stat.ads --- adadesigner-0.25/c_AdaDesigner_Statistics/sources/ada_designer_stat.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Statistics/sources/ada_designer_stat.ads 2011-02-20 11:50:04.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ --Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Utilities/sources/ada_designer-utilities.adb adadesigner-0.27/c_AdaDesigner_Utilities/sources/ada_designer-utilities.adb --- adadesigner-0.25/c_AdaDesigner_Utilities/sources/ada_designer-utilities.adb 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Utilities/sources/ada_designer-utilities.adb 2011-02-20 11:50:04.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada diff -Nru adadesigner-0.25/c_AdaDesigner_Utilities/sources/ada_designer-utilities.ads adadesigner-0.27/c_AdaDesigner_Utilities/sources/ada_designer-utilities.ads --- adadesigner-0.25/c_AdaDesigner_Utilities/sources/ada_designer-utilities.ads 2009-05-09 14:13:16.000000000 +0000 +++ adadesigner-0.27/c_AdaDesigner_Utilities/sources/ada_designer-utilities.ads 2011-02-20 11:50:03.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ --Asis diff -Nru adadesigner-0.25/debian/changelog adadesigner-0.27/debian/changelog --- adadesigner-0.25/debian/changelog 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/changelog 2011-02-20 20:36:45.000000000 +0000 @@ -1,3 +1,10 @@ +adadesigner (0.27-0ubuntu0) lucid; urgency=low + + * #7338 : Copyright assignment. + * #17758 : Dot_Processor / error while loading dot file. + + -- David SAUVAGE - AdaLabs Ltd Mon, 21 Feb 2011 00:05:42 +0400 + adadesigner (0.25-0ubuntu2) lucid; urgency=low * gnatgpr 0.32 integration @@ -5,12 +12,6 @@ -- David Sauvage Wed, 30 Jun 2010 20:53:29 +0200 -adadesigner (0.25-0ubuntu0) jaunty; urgency=low - - * #6795 : gnatpr 0.31 integration - - -- David Sauvage Thu, 15 Oct 2009 23:37:14 +0100 - adadesigner (0.24-0ubuntu0) jaunty; urgency=low * #6612 : license clean-up diff -Nru adadesigner-0.25/debian/control adadesigner-0.27/debian/control --- adadesigner-0.25/debian/control 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/control 2011-02-20 20:36:45.000000000 +0000 @@ -2,7 +2,7 @@ Section: devel Priority: extra Maintainer: Ubuntu MOTU Developers -XSBC-Original-Maintainer: David Sauvage +XSBC-Original-Maintainer: David SAUVAGE - AdaLabs Ltd Build-Depends: debhelper (>= 7), gnat (>= 4.3), libasis2008-dev, libgnatgpr0-dev Standards-Version: 3.7.3 Homepage: https://gna.org/projects/adadesigner @@ -31,5 +31,5 @@ AdaDesigner is based on : * GNATGPR (GPL). * ASIS (GPL). - * AUnit 2.03 (GPL). + * AUnit 3 (GPL). diff -Nru adadesigner-0.25/debian/copyright adadesigner-0.27/debian/copyright --- adadesigner-0.25/debian/copyright 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/copyright 2011-02-20 20:36:45.000000000 +0000 @@ -1,20 +1,21 @@ This package was debianized by David Sauvage on -Sun, 31 Aug 2008 21:31:42 +0200. +Thu, 21 Aug 2008 22:30:55 +0200. -It was downloaded from https://gna.org/projects/adadesigner +It was downloaded from https://gna.org/projects/gnatgpr Upstream Author(s): - David Sauvage - + AdaLabs Ltd Copyright: - Copyright (C) 2008 David Sauvage - + Copyright (C) 2011, AdaLabs Ltd. + + License: GNU General Public License -The Debian packaging is (C) 2008, David Sauvage and +The Debian packaging is (C) 2011, AdaLabs Ltd and is licensed under the GPL, see `/usr/share/common-licenses/GPL'. + diff -Nru adadesigner-0.25/debian/.svn/entries adadesigner-0.27/debian/.svn/entries --- adadesigner-0.25/debian/.svn/entries 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/.svn/entries 2011-02-20 20:36:45.000000000 +0000 @@ -25,24 +25,17 @@ d7389d53-0227-46aa-947e-2076e8cc571f - - - - - - -0 control file +73 - -2008-09-13T00:24:54.000000Z -02a565701312292e73b41586fb0763fa -2008-09-13T09:36:49.719001Z -26 +2011-02-20T20:08:22.000000Z +6044a43bc0d686974fa30ee80f3ef09c +2011-02-20T20:15:12.223936Z +73 psycose @@ -65,7 +58,7 @@ -1355 +1372 dirs file @@ -73,7 +66,7 @@ -2008-09-08T20:48:46.000000Z +2011-02-18T13:50:28.544047Z 362717e7464d60c498ef732268770754 2008-09-08T21:18:44.190710Z 22 @@ -107,7 +100,7 @@ -2008-09-08T20:48:46.000000Z +2011-02-18T13:50:28.544047Z 84bc3da1b3e33a18e8d5e1bdd7a18d7a 2008-09-08T21:18:44.190710Z 22 @@ -137,14 +130,14 @@ changelog file +73 - -2009-05-09T14:48:57.000000Z -d6f7fbd2e53807f1ed71461883978d97 -2009-10-15T22:53:14.549470Z -65 +2011-02-20T20:07:09.000000Z +2b390a80c1989248bf2a6e172b44ac1c +2011-02-20T20:15:12.223936Z +73 psycose @@ -167,18 +160,18 @@ -3085 +3519 copyright file +73 - -2008-09-08T20:48:46.000000Z -fc487f699cae5128953c299467de7066 -2008-09-08T21:18:44.190710Z -22 +2011-02-20T20:01:36.000000Z +7643092d453a5392cdab9f096908953a +2011-02-20T20:15:12.223936Z +73 psycose @@ -201,7 +194,7 @@ -475 +456 docs file @@ -209,7 +202,7 @@ -2008-09-08T20:48:46.000000Z +2011-02-18T13:50:28.544047Z e43917b39400a702bd8d7b288301b7e5 2008-09-08T21:18:44.190710Z 22 @@ -243,7 +236,7 @@ -2008-09-08T20:48:46.000000Z +2011-02-18T13:50:28.544047Z aadf4e1c6d9ce9e962ca8818162d9247 2008-09-08T21:18:44.190710Z 22 @@ -277,7 +270,7 @@ -2008-09-08T20:48:46.000000Z +2011-02-18T13:50:28.552059Z 58e1908592cba91c72014fe68b7e3cdf 2008-09-08T21:18:44.190710Z 22 diff -Nru adadesigner-0.25/debian/.svn/text-base/changelog.svn-base adadesigner-0.27/debian/.svn/text-base/changelog.svn-base --- adadesigner-0.25/debian/.svn/text-base/changelog.svn-base 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/.svn/text-base/changelog.svn-base 2011-02-20 20:36:45.000000000 +0000 @@ -1,3 +1,17 @@ +adadesigner (0.26-0ubuntu0) lucid; urgency=low + + * #7338 : Copyright assignment. + * #17758 : Dot_Processor / error while loading dot file. + + -- David SAUVAGE - AdaLabs Ltd Mon, 21 Feb 2011 00:05:42 +0400 + +adadesigner (0.25-0ubuntu2) lucid; urgency=low + + * gnatgpr 0.32 integration + * GCC 4.4.3 & Ubuntu 10.04 validation + + -- David Sauvage Wed, 30 Jun 2010 20:53:29 +0200 + adadesigner (0.24-0ubuntu0) jaunty; urgency=low * #6612 : license clean-up diff -Nru adadesigner-0.25/debian/.svn/text-base/control.svn-base adadesigner-0.27/debian/.svn/text-base/control.svn-base --- adadesigner-0.25/debian/.svn/text-base/control.svn-base 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/.svn/text-base/control.svn-base 2011-02-20 20:36:45.000000000 +0000 @@ -2,8 +2,8 @@ Section: devel Priority: extra Maintainer: Ubuntu MOTU Developers -XSBC-Original-Maintainer: David Sauvage -Build-Depends: debhelper (>= 7), gnat (>= 4.3), libasis-dev, libgnatgpr0-dev +XSBC-Original-Maintainer: David SAUVAGE - AdaLabs Ltd +Build-Depends: debhelper (>= 7), gnat (>= 4.3), libasis2008-dev, libgnatgpr0-dev Standards-Version: 3.7.3 Homepage: https://gna.org/projects/adadesigner @@ -31,5 +31,5 @@ AdaDesigner is based on : * GNATGPR (GPL). * ASIS (GPL). - * AUnit 2.03 (GPL). + * AUnit 3 (GPL). diff -Nru adadesigner-0.25/debian/.svn/text-base/copyright.svn-base adadesigner-0.27/debian/.svn/text-base/copyright.svn-base --- adadesigner-0.25/debian/.svn/text-base/copyright.svn-base 2011-02-20 20:36:45.000000000 +0000 +++ adadesigner-0.27/debian/.svn/text-base/copyright.svn-base 2011-02-20 20:36:45.000000000 +0000 @@ -1,20 +1,21 @@ This package was debianized by David Sauvage on -Sun, 31 Aug 2008 21:31:42 +0200. +Thu, 21 Aug 2008 22:30:55 +0200. -It was downloaded from https://gna.org/projects/adadesigner +It was downloaded from https://gna.org/projects/gnatgpr Upstream Author(s): - David Sauvage - + AdaLabs Ltd Copyright: - Copyright (C) 2008 David Sauvage - + Copyright (C) 2011, AdaLabs Ltd. + + License: GNU General Public License -The Debian packaging is (C) 2008, David Sauvage and +The Debian packaging is (C) 2011, AdaLabs Ltd and is licensed under the GPL, see `/usr/share/common-licenses/GPL'. + Binary files /tmp/h5lFQOyA3r/adadesigner-0.25/doc/presentation_adadesigner.pdf and /tmp/BBfLWczn_L/adadesigner-0.27/doc/presentation_adadesigner.pdf differ diff -Nru adadesigner-0.25/doc/presentation_adadesigner.tex adadesigner-0.27/doc/presentation_adadesigner.tex --- adadesigner-0.25/doc/presentation_adadesigner.tex 2009-03-25 19:49:28.000000000 +0000 +++ adadesigner-0.27/doc/presentation_adadesigner.tex 2011-02-20 19:31:57.000000000 +0000 @@ -6,15 +6,15 @@ % Title Page \title{AdaDesigner Presentation} -\author{David Sauvage} -\date{January 08, 2009} +\author{David SAUVAGE - AdaLabs Ltd - http://adalabs.com} +\date{February 20, 2011} \begin{document} \maketitle \begin{abstract} -AdaDesigner\footnote{https://gna.org/projects/adadesigner} is an Ada 2005 GPL software which aims to become an Ada software refactoring framework in the following area : +AdaDesigner\footnote{http://adalabs.com/products.html\#Adadesigner} is an Ada 2005 GPL software which aims to become an Ada software refactoring framework in the following area : \begin{itemize} \item text-to-model (T2M) transformation for software cartography and re-factoring. @@ -35,7 +35,7 @@ Using ASIS, AdaDesigner provides a code generation factory that allow efficient text-to-text transformation using templates and high level services. For example, it's trivial to generate a set of set/get methods for all record components of all record types that are present in a given compilation unit. -This feature will be published in the AdaDesigner GNA subversion repository in the beginning of 2009. +This feature will be published in the AdaDesigner GNA subversion repository in 2011. \item model-to-text (M2T) transformation for software re-engineering and re-factoring. @@ -52,7 +52,7 @@ AdaDesigner is based on : \begin{itemize} -\item GNATGPR\footnote{https://gna.org/projects/gnatgpr} +\item GNATGPR\footnote{http://adalabs.com/products.html\#Gnatgpr} \item ASIS \item AUnit\footnote{https://libre.adacore.com/aunit} \end{itemize} @@ -72,7 +72,7 @@ \center \begin{boxedminipage}{4in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][4in,2.5in]{images/adadesigner_schema.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/adadesigner_schema.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M process.} @@ -210,7 +210,7 @@ \center \begin{boxedminipage}{5in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][4in,2.5in]{images/gnatgpr.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/gnatgpr.png}} \end{center} \end{boxedminipage} \caption{GNATGPR cartography.} @@ -238,7 +238,7 @@ \center \begin{boxedminipage}{5in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][4in,2.5in]{images/adadesigner_analysis.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/adadesigner_analysis.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner cartography with analysis level set to 0.} @@ -292,7 +292,7 @@ \center \begin{boxedminipage}{5in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][5in,2in]{images/adadesigner_filter.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/adadesigner_filter.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of AdaDesigner focusing on c\_AdaDesigner\_Utilities sub-component.} @@ -311,7 +311,7 @@ \center \begin{boxedminipage}{6in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][5in,3in]{images/aunit_build.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/aunit_build.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of AUnit.} @@ -326,7 +326,7 @@ \center \begin{boxedminipage}{6in} \begin{center} - \scalebox{1}{\includegraphics*[-0.5in,-0.5in][5in,3in]{images/gnatgpr.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/gnatgpr.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of GNATGPR.} @@ -347,7 +347,7 @@ \center \begin{boxedminipage}{6in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][6in,4in]{images/adadesigner.png}} + \scalebox{1}{\includegraphics[width=1\textwidth]{images/adadesigner.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of AdaDesigner.} @@ -370,7 +370,7 @@ \center \begin{boxedminipage}{6in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][3.5in,5in]{images/adactl.png}} + \scalebox{1}{\includegraphics[width=0.5\textwidth]{images/adactl.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of AdaControl.} @@ -385,7 +385,7 @@ \center \begin{boxedminipage}{7in} \begin{center} -\scalebox{1}{\includegraphics*[0in,0in][4in,6in]{images/ahven_lib.png}} +\scalebox{1}{\includegraphics[width=0.6\textwidth]{images/ahven_lib.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of Ahven.} @@ -400,7 +400,7 @@ \center \begin{boxedminipage}{7in} \begin{center} -\scalebox{1}{\includegraphics*[-0.5in,-0.5in][6.5in,3in]{images/aws.png}} +\scalebox{1}{\includegraphics[width=0.8\textwidth]{images/aws.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of AWS.} @@ -414,7 +414,7 @@ \center \begin{boxedminipage}{6in} \begin{center} - \scalebox{1}{\includegraphics*[0in,0in][4.5in,6in]{images/browsers.png}} + \scalebox{1}{\includegraphics[width=0.5\textwidth]{images/browsers.png}} \end{center} \end{boxedminipage} \caption{AdaDesigner T2M analysis of GNAT GPS/Browser component.} @@ -427,7 +427,7 @@ Using ASIS, AdaDesigner provides a code generation factory that allow efficient text-to-text transformation using templates and high level services. For example, it's trivial to generate a set of set/get methods for all record components of all record types that are present in a given compilation unit. -This feature will be published in the AdaDesigner GNA subversion repository in the beginning of 2009. +This feature will be published in the AdaDesigner GNA subversion repository in 2011. \end{document} diff -Nru adadesigner-0.25/Makefile adadesigner-0.27/Makefile --- adadesigner-0.25/Makefile 2009-05-09 14:23:54.000000000 +0000 +++ adadesigner-0.27/Makefile 2011-02-20 20:13:10.000000000 +0000 @@ -1,20 +1,22 @@ -##---------------------------------------------------------------------------- +##------------------------------------------------------------------------------ +##-- -- +##-- AdaDesigner -- ##-- -- -##-- AdaDesigner -- ##-- -- +##-- Copyright (C) 2007-2011, AdaLabs Ltd. -- ##-- -- -##-- Copyright (C) 2007-2009, David Sauvage. -- +##-- http://adalabs.com -- ##-- -- -##-- AdaDesigner is free software; you can redistribute it and/or modify it under -- -##-- terms of the GNU General Public License as published by the Free Soft- -- -##-- ware Foundation; either version 2, or (at your option) any later ver- -- -##-- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- -##-- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- -##-- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- -##-- for more details. You should have received a copy of the GNU General -- -##-- Public License distributed with AdaDesigner; see file COPYING. If not, write -- -##-- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- -##-- Boston, MA 02110-1301, USA. -- +##-- AdaDesigner is free software; you can redistribute it and/or modify it -- +##-- under terms of the GNU General Public License as published by the Free -- +##-- Software Foundation; either version 2, or (at your option) any later -- +##-- version. AdaDesigner is distributed in the hope that it will be useful, -- +##-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +##-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +##-- Public License for more details. You should have received a copy of -- +##-- the GNU General Public License distributed with GNAT; see file COPYING.-- +##-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +##-- Fifth Floor, Boston, MA 02110-1301, USA. -- ##-- -- ##------------------------------------------------------------------------------ PREFIX?="" @@ -31,7 +33,9 @@ "-- AdaDesigner --\n" \ "-- --\n" \ "-- --\n" \ -"-- Copyright (C) 2007-2008, David Sauvage. --\n" \ +"-- Copyright (C) 2007-2011, AdaLabs Ltd. --\n" \ +"-- --\n" \ +"-- http://adalabs.com --\n" \ "-- --\n" \ "-- AdaDesigner is free software; you can redistribute it and/or modify it under --\n" \ "-- terms of the GNU General Public License as published by the Free Soft- --\n" \ @@ -73,7 +77,7 @@ @echo $(DATE) tar --exclude=.svn -czvf ../$(CURRENT_FILE) ../adadesigner liv: -ifeq ("1","$(shell echo $$(cd test/bin ; ./harness_adadesigner -v | grep "Successful Tests: 1" | wc -l))") +ifeq ("1","$(shell echo $$(cd test/bin ; ./harness_adadesigner -v | grep "Successful Tests: 1" | wc -l))") @echo $(DATE) @find . -name \*\~ -exec rm {} \; @find . -name \*.tmp -exec rm {} \; @@ -90,12 +94,12 @@ @gnatclean -r -P test/harness_adadesigner.gpr svn status @echo "Please verify svn status" - read + read dummy @echo "[http://download.gna.org/adadesigner/$(NEXT_FILE) $(NEXT_FILE)] released date : $(DATE)" >> README @echo "" >> README @txt2html README > README.html - @echo -e $(VERSION_ADS) > c_AdaDesigner_Core/sources/version_adadesigner.ads - @echo $(NEXT_RELEASE) > RELEASE + @printf %b$(VERSION_ADS) > c_AdaDesigner_Core/sources/version_adadesigner.ads + @printf %b$(NEXT_RELEASE) > RELEASE svn status @echo "Please enter commit comment #item, ..." svn commit -m $$(echo $$(read comment && echo \"$$comment\" | sed -e 's/ /_/g')) @@ -114,21 +118,20 @@ release: @echo "Please verify the release number ; adadesigner-$(VERSION).$(CURRENT_RELEASE), cancel if not ok" - @read + @read dummy @echo "Please give Release adadesigner-$(VERSION).$(CURRENT_RELEASE) comment #item, release ($(VERSION).$(CURRENT_RELEASE)) ; " #verify that tag does not exist svn copy svn+ssh://$(USER)@svn.gna.org/svn/adadesigner/trunk svn+ssh://$(USER)@svn.gna.org/svn/adadesigner/tags/adadesigner-$(VERSION).$(CURRENT_RELEASE) -m $$(echo $$(read comment && echo \"$$comment\" | sed -e 's/ /_/g')) # verify that files exist mv ../$(CURRENT_FILE) ../$(CURRENT_FILE).sig ../../upload_adadesigner/ - rsync --delete -avr --rsh="ssh" ../../upload_adadesigner/ $(USER)@download.gna.org:/upload/adadesigner + rsync -avr --rsh="ssh" ../../upload_adadesigner/ $(USER)@download.gna.org:/upload/adadesigner updatehtml: txt2html README > README.html updatedoc: - cd doc ; latex presentation_adadesigner.tex - cd doc ; latex presentation_adadesigner.tex - cd doc ; dvipdfm presentation_adadesigner.dvi + cd doc ; pdflatex presentation_adadesigner.tex + cd doc ; pdflatex presentation_adadesigner.tex releasedoc: svn delete svn+ssh://$(USER)@svn.gna.org/svn/adadesigner/website/presentation_adadesigner.pdf diff -Nru adadesigner-0.25/README adadesigner-0.27/README --- adadesigner-0.25/README 2009-10-15 22:52:27.000000000 +0000 +++ adadesigner-0.27/README 2011-02-20 20:14:56.000000000 +0000 @@ -97,3 +97,7 @@ [http://download.gna.org/adadesigner/adadesigner-0.25.tar.gz adadesigner-0.25.tar.gz] released date : 20091016-0052 +[http://download.gna.org/adadesigner/adadesigner-0.26.tar.gz adadesigner-0.26.tar.gz] released date : 20110220-2354 + +[http://download.gna.org/adadesigner/adadesigner-0.27.tar.gz adadesigner-0.27.tar.gz] released date : 20110221-0014 + diff -Nru adadesigner-0.25/README.html adadesigner-0.27/README.html --- adadesigner-0.25/README.html 2009-10-15 22:52:29.000000000 +0000 +++ adadesigner-0.27/README.html 2011-02-20 20:14:56.000000000 +0000 @@ -108,6 +108,10 @@

[http://download.gna.org/adadesigner/adadesigner-0.25.tar.gz adadesigner-0.25.tar.gz] released date : 20091016-0052

+

[http://download.gna.org/adadesigner/adadesigner-0.26.tar.gz adadesigner-0.26.tar.gz] released date : 20110220-2354 +

+

[http://download.gna.org/adadesigner/adadesigner-0.27.tar.gz adadesigner-0.27.tar.gz] released date : 20110221-0014 +

diff -Nru adadesigner-0.25/RELEASE adadesigner-0.27/RELEASE --- adadesigner-0.25/RELEASE 2009-10-15 22:52:29.000000000 +0000 +++ adadesigner-0.27/RELEASE 2011-02-20 20:14:56.000000000 +0000 @@ -1 +1 @@ -25 +27 \ No newline at end of file diff -Nru adadesigner-0.25/test/harness_adadesigner.gpr adadesigner-0.27/test/harness_adadesigner.gpr --- adadesigner-0.25/test/harness_adadesigner.gpr 2009-02-01 22:55:23.000000000 +0000 +++ adadesigner-0.27/test/harness_adadesigner.gpr 2011-02-20 11:47:39.000000000 +0000 @@ -1,3 +1,24 @@ +------------------------------------------------------------------------------ +-- -- +-- AdaDesigner -- +-- -- +-- -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- +-- -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- +-- -- +------------------------------------------------------------------------------ with "../adadesigner.gpr"; with "aunit.gpr"; with "asis.gpr"; diff -Nru adadesigner-0.25/test/sources/aunit_adadesigner.ads adadesigner-0.27/test/sources/aunit_adadesigner.ads --- adadesigner-0.25/test/sources/aunit_adadesigner.ads 2008-08-24 22:26:52.000000000 +0000 +++ adadesigner-0.27/test/sources/aunit_adadesigner.ads 2011-02-20 11:47:22.000000000 +0000 @@ -1,3 +1,24 @@ +------------------------------------------------------------------------------ +-- -- +-- AdaDesigner -- +-- -- +-- -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- +-- -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- +-- -- +------------------------------------------------------------------------------ with AUnit_Framework.Framework; with AUnit_Framework.Message_Strings; package AUnit_AdaDesigner is diff -Nru adadesigner-0.25/test/sources/example2.adb adadesigner-0.27/test/sources/example2.adb --- adadesigner-0.25/test/sources/example2.adb 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/example2.adb 2011-02-20 11:47:17.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada @@ -23,5 +25,5 @@ procedure Example2 is begin - Ada.Text_IO.Put_Line ("Coucou Ras"); + Ada.Text_IO.Put_Line ("Hi Ras"); end Example2; diff -Nru adadesigner-0.25/test/sources/harness_adadesigner.adb adadesigner-0.27/test/sources/harness_adadesigner.adb --- adadesigner-0.25/test/sources/harness_adadesigner.adb 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/harness_adadesigner.adb 2011-02-20 11:53:10.000000000 +0000 @@ -3,44 +3,46 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- AUnit --- with AUnit_Framework.Tests.Test_Runner; +with AUnit.Test_Suites, + AUnit.Run, + AUnit.Reporter.Text; -- List of tests and suites to run: with Test_Case_Unit_Analysis; --- AdaDesigner -with AUnit_AdaDesigner; use AUnit_AdaDesigner; - - procedure Harness_AdaDesigner is + Result : aliased constant AUnit.Test_Suites.Access_Test_Suite + := new AUnit.Test_Suites.Test_Suite; + Test_Unit_Analysis : aliased Test_Case_Unit_Analysis.Test_Case; + Reporter : AUnit.Reporter.Text.Text_Reporter; function Suite return AUnit.Test_Suites.Access_Test_Suite is - Result : constant AUnit.Test_Suites.Access_Test_Suite - := new AUnit.Test_Suites.Test_Suite; begin -- You may add multiple tests or suites here: - AUnit.Test_Suites.Add_Test (Result, new Test_Case_Unit_Analysis.Test_Case); + AUnit.Test_Suites.Add_Test (Result, Test_Unit_Analysis'Access); return Result; end Suite; - procedure Run is new AUnit.Test_Runner (Suite); + procedure Run is new AUnit.Run.Test_Runner (Suite); begin - Run; + Run (Reporter); end Harness_AdaDesigner; diff -Nru adadesigner-0.25/test/sources/test_case_unit_analysis.adb adadesigner-0.27/test/sources/test_case_unit_analysis.adb --- adadesigner-0.25/test/sources/test_case_unit_analysis.adb 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/test_case_unit_analysis.adb 2011-02-20 11:53:59.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada @@ -22,6 +24,9 @@ Ada.Directories; use Ada.Strings.Unbounded; +-- AUnit +with AUnit.Assertions; + -- Asis with Asis, Asis.Compilation_Units; @@ -211,7 +216,7 @@ function Name (T: Test_Case) return AUnit.Test_String is pragma Unreferenced (T); begin - return AUnit.Message_Strings.New_String("Unit analysis"); + return AUnit.Format ("Unit analysis"); end Name; end Test_Case_Unit_Analysis; diff -Nru adadesigner-0.25/test/sources/test_case_unit_analysis.ads adadesigner-0.27/test/sources/test_case_unit_analysis.ads --- adadesigner-0.25/test/sources/test_case_unit_analysis.ads 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/test_case_unit_analysis.ads 2011-02-20 11:52:20.000000000 +0000 @@ -3,23 +3,25 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- AUnit -with AUnit_AdaDesigner; use AUnit_AdaDesigner; +with AUnit.Test_Cases; package Test_Case_Unit_Analysis is type Test_Case is new AUnit.Test_Cases.Test_Case diff -Nru adadesigner-0.25/test/sources/tester.adb adadesigner-0.27/test/sources/tester.adb --- adadesigner-0.25/test/sources/tester.adb 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/tester.adb 2011-02-20 11:54:45.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada @@ -23,8 +25,8 @@ use Ada.Strings.Unbounded; -- AUnit -with AUnit_AdaDesigner; -use AUnit_AdaDesigner; +with AUnit.Assertions; + package body Tester is diff -Nru adadesigner-0.25/test/sources/tester.ads adadesigner-0.27/test/sources/tester.ads --- adadesigner-0.25/test/sources/tester.ads 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/tester.ads 2011-02-20 11:46:44.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Asis diff -Nru adadesigner-0.25/test/sources/tester_dd.ads adadesigner-0.27/test/sources/tester_dd.ads --- adadesigner-0.25/test/sources/tester_dd.ads 2009-05-09 14:14:10.000000000 +0000 +++ adadesigner-0.27/test/sources/tester_dd.ads 2011-02-20 11:46:41.000000000 +0000 @@ -3,18 +3,20 @@ -- AdaDesigner -- -- -- -- -- --- Copyright (C) 2007-2009, David Sauvage. -- +-- Copyright (C) 2007-2011, AdaLabs Ltd. -- -- -- --- AdaDesigner is free software; you can redistribute it and/or modify it under -- --- terms of the GNU General Public License as published by the Free Soft- -- --- ware Foundation; either version 2, or (at your option) any later ver- -- --- sion. AdaDesigner is distributed in the hope that it will be useful, but WITH- -- --- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY -- --- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -- --- for more details. You should have received a copy of the GNU General -- --- Public License distributed with AdaDesigner; see file COPYING. If not, write -- --- to the Free Software Foundation, 51 Franklin Street, Fifth Floor, -- --- Boston, MA 02110-1301, USA. -- +-- http://adalabs.com -- +-- -- +-- AdaDesigner is free software; you can redistribute it and/or modify it -- +-- under terms of the GNU General Public License as published by the Free -- +-- Software Foundation; either version 2, or (at your option) any later -- +-- version. AdaDesigner is distributed in the hope that it will be useful, -- +-- but WITHOUT ANY WARRANTY; without even the implied warranty of -- +-- MERCHANTABILITYor FITNESS FOR A PARTICULAR PURPOSE. See the GNU General -- +-- Public License for more details. You should have received a copy of -- +-- the GNU General Public License distributed with GNAT; see file COPYING.-- +-- If not, write to the Free Software Foundation, 51 Franklin Street, -- +-- Fifth Floor, Boston, MA 02110-1301, USA. -- -- -- ------------------------------------------------------------------------------ -- Ada