comp.lang.ada
 help / color / mirror / Atom feed
* Dhrystone 2.1 : d_pack_2_s.a File
@ 1989-07-14  3:00 Karl Nyberg
  0 siblings, 0 replies; only message in thread
From: Karl Nyberg @ 1989-07-14  3:00 UTC (permalink / raw)


------------------------------------------------------------------------
--
--                   "DHRYSTONE" Benchmark Program
--                   -----------------------------
--                                                                            
--  Version:    Ada, Version 2.1
--                                                                            
--  File:       d_pack_2.s (part 3 of 6)
--
--  Date:       August 17, 1988
--
--  Author:     Reinhold P. Weicker
--
------------------------------------------------------------------------

  with Global_Def;
  use Global_Def;

package Pack_2 is
--------------

  procedure Proc_6 (Enum_Par_In:        in     Enumeration;
                    Enum_Par_Out:       out    Enumeration);
  procedure Proc_7 (Int_Par_In_1,
                    Int_Par_In_2:       in     One_To_Fifty;
                    Int_Par_Out:        out    One_To_Fifty);
  procedure Proc_8 (Array_Par_In_Out_1: in out Array_1_Dim_Integer;
                    Array_Par_In_Out_2: in out Array_2_Dim_Integer;
                    Int_Par_In_1,
                    Int_Par_In_2:       in     integer);
  function Func_1 (Char_Par_In_1,
                   Char_Par_In_2:       in     Capital_Letter)
                                                    return Enumeration;
  function Func_2 (String_Par_In_1,
                   String_Par_In_2:     in     String_30)
                                                    return boolean;

end Pack_2;

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~1989-07-14  3:00 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1989-07-14  3:00 Dhrystone 2.1 : d_pack_2_s.a File Karl Nyberg

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox