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.66.151.130 with SMTP id uq2mr31540030pab.33.1425979053215;
 Tue, 10 Mar 2015 02:17:33 -0700 (PDT)
X-Received: by 10.140.18.213 with SMTP id 79mr485515qgf.38.1425979053052; Tue,
 10 Mar 2015 02:17:33 -0700 (PDT)
Path: 
 border2.nntp.dca1.giganews.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!hl2no8513461igb.0!news-out.google.com!db6ni44602igc.0!nntp.google.com!hl2no5908062igb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Tue, 10 Mar 2015 02:17:32 -0700 (PDT)
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=2001:980:d35e:1:49ff:9fbf:9389:6496;
 posting-account=-iT6ZQoAAAAlqBCInAc-vB6x1soT8Jhq
NNTP-Posting-Host: 2001:980:d35e:1:49ff:9fbf:9389:6496
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <3fda0da9-7a54-41f3-b226-1e4f67e08803@googlegroups.com>
Subject: GNAT serial comm  under FreeBSD - PROGRAM_ERROR raised
From: darek <darek.maksimiuk@gmail.com>
Injection-Date: Tue, 10 Mar 2015 09:17:33 +0000
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Xref: number.nntp.giganews.com comp.lang.ada:192453
Date: 2015-03-10T02:17:32-07:00
List-Id: <comp.lang.ada>

Hi All,
  I have installed the AUX compiler from http://www.freshports.org/lang/gcc=
-aux/ (gcc version 4.9.2, 20141030)  on my FreeBSD (ver. 9.2, amd 64)  mach=
ine. The PC needs to talk to an external device via the serial port. The pr=
ogram compiles without any problems but at  the run-time, I got the followi=
ng exception:

 raised PROGRAM_ERROR : Serial Communications not implemented

If this is a feature (due to any imaginable issues), is there any other pac=
kage that  handles the serial communication under FreeBSD?

BTW, the status of the port on http://www.dragonlace.net/ is described as a=
 "perfect".=20


Cheers,
  Darek=20


Test program:

with Ada.Text_IO; use Ada.Text_IO;
with GNAT.Serial_Communications;=20

procedure TestSerial is

   package Serial_IO renames GNAT.Serial_Communications;
  =20
   Port_ID : Serial_IO.Serial_Port;
   Port_Name : Serial_IO.Port_Name(1..10) :=3D "/dev/ttyu0";

begin
  =20
   Put_Line("Test  serial port");
   Serial_IO.Open(Port_ID,  Port_Name);  =20

   Serial_IO.Close(Port_ID);
  =20
end TestSerial;