From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.236.221.168 with SMTP id r38mr363069yhp.54.1392293712770;
 Thu, 13 Feb 2014 04:15:12 -0800 (PST)
X-Received: by 10.51.17.7 with SMTP id ga7mr48575igd.4.1392293712413; Thu, 13
 Feb 2014 04:15:12 -0800 (PST)
Path: 
 border1.nntp.dca3.giganews.com!backlog3.nntp.dca3.giganews.com!border3.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!nntp.giganews.com!k15no19281291qaq.0!news-out.google.com!h8ni1igy.0!nntp.google.com!uq10no18766216igb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 13 Feb 2014 04:15:11 -0800 (PST)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=217.156.151.254;
 posting-account=hmWHQgoAAACLFyAR0aQ0yGOulYRXLN_V
NNTP-Posting-Host: 217.156.151.254
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <aae6105c-fb90-42f0-b87e-6d38122fd64c@googlegroups.com>
Subject: Procedure defined in package body accessed by separate procedure
From: ashwath30jul77@gmail.com
Injection-Date: Thu, 13 Feb 2014 12:15:12 +0000
Content-Type: text/plain; charset=ISO-8859-1
X-Original-Bytes: 2094
Xref: number.nntp.dca.giganews.com comp.lang.ada:184819
Date: 2014-02-13T04:15:11-08:00
List-Id: <comp.lang.ada>

Hello,
I am getting an error when a procedure(say Pr1) defined in a separate file invokes a procedure defined in the package(say Pk1) body(say Pr2). The compiler gives error saying that Pr2 is not declared in Pk1. 

Please let me know what is the mistake I am doing.

Snapshots of source code is shown for better clarity.

Greetings.ads:
=============================
package Greetings is

   procedure Hello;
   procedure Goodbye;

end Greetings;

Greetings.adb:
==============================
with text_io;
use Text_IO;

package body Greetings is

   procedure Hello is separate;
   procedure Goodbye is separate;
   procedure proc_body is
   begin
      put_line("body");
   end;
end Greetings;

Greetings-Hello.ada:
================================
with text_io;
use Text_IO;
separate (Greetings)

procedure Hello is
begin
   put_line("Hello");
   Greetings.proc_body;--Compiler error here. Says proc_body is not declared in Greetings
end;

I am using GNAT pro to compile this.

Thanks in Advance
Ashwath