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=unavailable autolearn_force=no version=3.4.4 Path: border1.nntp.ams.giganews.com!nntp.giganews.com!feeder.erje.net!eu.feeder.erje.net!eternal-september.org!feeder.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail From: Simon Wright Newsgroups: comp.lang.ada Subject: Re: The future of Spark . Spark 2014 : a wreckage Date: Wed, 10 Jul 2013 13:46:03 +0100 Organization: A noiseless patient Spider Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain Injection-Info: mx05.eternal-september.org; posting-host="c8504a89c76ea11bda6664e6198ae3cd"; logging-data="31513"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX18OjnsusyWaebT/0xorKsh4+aneGm9OpR4=" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3 (darwin) Cancel-Lock: sha1:/zwrJlNS2OAQAX+BAzbZ3YIOvXI= sha1:s5hWo9zjI8oH0I8WLGjTEcHiW4U= Xref: number.nntp.dca.giganews.com comp.lang.ada:182431 Date: 2013-07-10T13:46:03+01:00 List-Id: Stefan.Lucks@uni-weimar.de writes: > procedure Count_Vote(Vote: Vote_Type; > Count_A, Count_B, Invalid: out Natural) > with Depends (Count_A => Vote, Count_A, > Count_B => Vote, Count_B, > Invalid => Vote, Invalid); We'd hope this would fail verification because eg Count_A is an out parameter and therefore the result can't depend on the original value!