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 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,2dd7b69b3c782182
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news4.google.com!news.glorb.com!news.zanker.org!newsfeed00.sul.t-online.de!t-online.de!news-lei1.dfn.de!news.uni-jena.de!not-for-mail
From: Christopher Broeg <broeg@astro.uni-jena.de>
Newsgroups: comp.lang.ada
Subject: Re: Catching Ctrl-C SIGINT
Date: Mon, 17 Jan 2005 15:35:12 +0100
Organization: Friedrich Schiller University Jena, Germany
Message-ID: <csgif0$5r8$1@fsuj29.rz.uni-jena.de>
References: <csgasv$2u3$1@fsuj29.rz.uni-jena.de>
 <41ebc7fc_1@baen1673807.greenlnk.net>
NNTP-Posting-Host: ent.astro.uni-jena.de
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: fsuj29.rz.uni-jena.de 1105972512 5992 141.35.25.76 (17 Jan 2005
 14:35:12 GMT)
X-Complaints-To: news@rz.uni-jena.de
NNTP-Posting-Date: 17 Jan 2005 14:35:12 GMT
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.6) Gecko/20040114
X-Accept-Language: en-us, en
In-Reply-To: <41ebc7fc_1@baen1673807.greenlnk.net>
Xref: g2news1.google.com comp.lang.ada:7870
Date: 2005-01-17T14:35:12+00:00
List-Id: <comp.lang.ada>

Martin Dowie wrote:
> Christopher Broeg wrote:
> [snip]
> 
>>Here the problem:
>>I do get the message
>>"Interrupt SIGINT caught. sending signal "
>>but the signal_public procedure never manages to send the signal. I
>>don't know why. If I call the signal_public procedure from test1 it
>>works, but is of course useless.
>>
>>Can you give me any hints on what I am doing wrong? I am lost.
>>
>>Maybe there is a better way to react upon the interrupt? But still I
>>am wondering why my solution is not working.
> 
> 
> Not a good idea to call "Put_Line" from a protected object as it is a
> (potentially blocking call).
> 
> Take out the "Put_Lines" and increment an unprotected unsigned integer
> instead and from within a task poll say @1Hz and look for the integer
> changing - i.e. try an look for a side-effect of the protected object doing
> its job. You can always remove this task once you're convinced all is ok.
> 
> Cheers
> 
> -- Martin
> 
> 
> 

Thanx for the answer. I'll give it a try.

-- Chris