Path: utzoo!mnetor!uunet!husc6!cmcl2!brl-adm!umd5!purdue!decwrl!ucbvax!eg.csc.ti.COM!LINNIG
From: LINNIG@eg.csc.ti.COM (Mike Linnig)
Newsgroups: comp.lang.ada
Subject: Tartan Ada results for conformance test
Message-ID: <8805062254.AA18640@ti.com>
Date: 29 Apr 88 14:12:00 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The Internet
Lines: 45

The Tartan Ada cross compiler for the 1750A processor
catches the duplicate definition....

	Mike Linnig,
	Texas Instruments

----------------------------------------------------------------------
TARTAN Ada VMS/1750A, Version V1.01  

*** First error or warning is on line 6

   1|package paramtest is
   2|  procedure string_in ( a_string : in string := "default value");
   3|end paramtest;
   4|
   5|package body paramtest is
   6|  procedure string_in ( a_string : in string := "other default value")
       ^1
***  1 Error 2100: Duplicate declaration (8.3) 
*** Next error or warning is on line 17
    | is
   7|    begin
   8|     null;
   9|  end string_in;
  10|end paramtest;
  11|
  12|package paramtest2 is
  13|  procedure integer_in ( an_integer : in integer := 15 );
  14|end paramtest2;
  15|
  16|package body paramtest2 is
  17|  procedure integer_in ( an_integer : in integer := 25 ) is
       ^1
*** Previous error or warning was on line 6
***  1 Error 2100: Duplicate declaration (8.3) 
  18|    begin
  19|     null;
  20|  end integer_in;
  21|end paramtest2;
  22|
  23|

*** Last error or warning was on line 17

*** Errors: 2, Warnings: 0