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=ham autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,794c64d1f9164710
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-02-20 17:14:08 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!feed2.news.rcn.net!rcn!dca6-feed2.news.digex.net!intermedia!newsfeed1.cidera.com!Cidera!portc01.blue.aol.com!audrey04.news.aol.com!not-for-mail
X-Admin: news@aol.com
From: unversedangel@aol.com (Unversed Angel)
Newsgroups: comp.lang.ada
Date: 21 Feb 2002 01:13:34 GMT
References: <ajXc8.39517$6g7.510228627@newssvr14.news.prodigy.com>
Organization: AOL, http://www.aol.co.uk
Subject: Re: functions, packages & characters
Message-ID: <20020220201334.11694.00002066@mb-bg.aol.com>
Xref: archiver1.google.com comp.lang.ada:20190
Date: 2002-02-21T01:13:34+00:00
List-Id: <comp.lang.ada>

I want to know if i can include several functions in one main program.
I don't know how to find/use the "replace" capability and so far i have this
but since i've been at the screen all day i don't know if it's gibberish or
not.
with Text_IO;
use Text_IO;
procedure Simple1 is
  ---
  ---pre: tags are in the text
  ---post:tags have been correctly reformatted
  ---
  Text: File;
begin
  Put_Line ("Please enter text: ");
      function Get_Line (Text :String)
        return Unbounded_String;
      begin
      Get_Line;  
      end;
       function Find_Dblslash (//)
         return Single Slash(/);
       begin  
       if any c=// then use function Find_dblslash;
       end if;
       end;
end;