comp.lang.ada
 help / color / mirror / Atom feed
From: Bj�rn Lundin <bjorn.lundin@swipnet.se>
Subject: no crash dump ?
Date: Thu, 7 Mar 2002 21:56:39 +0100
Date: 2002-03-07T21:56:39+01:00	[thread overview]
Message-ID: <20020307215639.37cf3f6d.bjorn.lundin@swipnet.se> (raw)

Hi!
I'm trying to get access to the joystick port with this program 
(using linux mandrake 8.1 and gnat 3.13)
I don't get access (running as root) AND I don't get a crash dump either?
Does anyone know why?

/Bj�rn

--------
with Text_io; use Text_io;
with system;
with GNAT.Traceback.Symbolic;

procedure interrupt is

  Joystick_address : system.address := system'to_address(16#0201#);

  type byte is range 0..255;
  for byte'size use 8;
  Joystick : byte;
  for Joystick'address use Joystick_address;

begin
   put_line("Main program started!");
   loop
     put_line("In loop");
     put_line(byte'image(b));
     delay 0.2;
   end loop;

exception
  when Event : others =>
    Put_Line (GNAT.Traceback.Symbolic.Symbolic_Traceback (Event));

end interrupt;



             reply	other threads:[~2002-03-07 20:56 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2002-03-07 20:56 Bj�rn Lundin [this message]
2002-03-07 22:08 ` no crash dump ? Anders Gidenstam
2002-03-08  0:37 ` sk
2002-03-08 16:22   ` Bj�rn Lundin
2002-03-08 22:13     ` Jeffrey Carter
2002-03-08 22:49     ` sk
2002-03-09 18:07       ` Bj�rn Lundin
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox