[Uml-devel] Import Ada tasks using Umbrello

Flint, Glen A (IS) Glen.A.Flint at ngc.com
Tue Feb 15 18:31:47 UTC 2011


Hi,

I'm experimenting with importing some Ada code into Umbrello (KDE 4.5.4) and noticed that it doesn't see task entrys.   For example, when the following code is imported only Consistency_Result_Type and Possible_Choices are listed under Player_Package.  Are tasks not part of UML or just not yet part of Umbrello?

Thanks for your consideration.

Glen Flint

--\def\unlist{
--------------------------------------------------------------------------------
-- Copyright (C) 2009  Bruce R. Barkstrom
--
-- This program is free software; you can redistribute it and/or modify
-- it under the terms of the GNU General Public License as published by
-- the Free Software Foundation; either version 2 of the License, or
-- any later version.
--
-- This program is distributed in the hope that it will be useful,
-- but WITHOUT 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
-- along with this program; if not, write to the Free Software
-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
--
-- Author: B. R. Barkstrom
--         15 Josie Lane.
--         Asheville, NC  28804  USA
--         Phone:  +1 828/337-7128
--         e-mail: alicebarkstrom at verizon.net
--------------------------------------------------------------------------------
--}\def\VersionID{1}
--
-- Revision History:
--   2/16/2009 - 4/9/2009 - B. R. Barkstrom
--     - Original Version.
--------------------------------------------------------------------------------
-- PURPOSE:
--    This package is intended to provide a common definition for real numbers
--    used in numerical work for internal purposes, including probability
--    distribution calculations, random numbers, and Julian Date calculations.
--
-- INPUT:
--    Nothing is brought in.
--
-- OUTPUT:
--    The definitions are all in public portions of this package.
--------------------------------------------------------------------------------
--} Version: 1
with Common_Defs;               use Common_Defs;

package Player_Package is
   -----------------------------------------------------------------------------
   -- Types
   -----------------------------------------------------------------------------
   type Possible_Choices is (Red, Green, Blue);
   type Choice_Selection is array (Red .. Blue) of Boolean;
   --
   Max_No_Of_Players      : constant natural
     := 3;
   type Player_Communications is array (1 .. Max_No_Of_Players - 1) of natural;
   --
   type Consistency_Result_Type is (No_Change, Pruned, Empty_Selection);
   --
   task type Player_Type is
      entry Accept_Input(Player_Index            : in     natural;
                         Player_Comm_Permissions : in     Player_Communications;
                         Player_Init_Choices     : in     Choice_Selection);
      entry Provide_Selection(Current_Selection  :    out Choice_Selection);
      entry Start_Play;
      entry Prepare_to_Terminate;
   end Player_Type;
   -----------------------------------------------------------------------------
   -- Variables
   -----------------------------------------------------------------------------
   Number_Of_Players : constant natural
     := Max_No_Of_Players;
   Player            : array (1 .. Number_Of_Players) of Player_Type;
end Player_Package;
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.kde.org/pipermail/umbrello-devel/attachments/20110215/d3603105/attachment.html>


More information about the umbrello-devel mailing list