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=2.1 required=5.0 tests=BAYES_20,INVALID_MSGID,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,9451f269f5a90558,start
X-Google-Attributes: gid103376,public
From: "JimBOB" <house@theprairy>
Subject: Re: making music
Date: 1998/04/24
Message-ID: <3542664f.0@news.thefree.net>#1/1
X-Deja-AN: 347674427
Content-Transfer-Encoding: 7bit
References: <35397BC6.2A85CEAC@wvnet.at> <35398fdf.116942877@news.nextdim.com>
Content-Type: text/plain; charset="iso-8859-1"
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
Organization: home
MIME-Version: 1.0
Reply-To: "JimBOB" <--Sumware@butno'here.com>
Newsgroups: comp.lang.ada
Date: 1998-04-24T00:00:00+00:00
List-Id: <comp.lang.ada>


hello,
hopefully you can help me..
I'm writing for Linux.. or any other port!

I compiled a small body of code,

with text_io,basic_num,mcc-sounds;
use  text_io,basic_num,mcc-sounds;

procedure play_for_me is
wav:string;
begin
  put("what wav file would you like to listen to?");
  get(wav);
  Play_Sound(wav);
end play_for_me;

With a package body from ftp.usafa... I tried to get this to work, but it
tells me:

play_for_me.adb:4:27:is missing";"
play_for_me.adb:5:27:is missing";"
gnatmake:"play_for_me.adb"compilation error


Hopefully you know the package body stuff, or should I send that to?
I can't see that Im missing a ";" anywhere!

Any help will be appreciated.