From: sl AT psycode DOT com DOT NOSPAM (Gili) Newsgroups: comp.os.msdos.djgpp Subject: Re: To person who ported PGCC to DJGPP Date: 18 Jun 1998 21:08:06 GMT Organization: The World's Usenet -- http://www.Supernews.com Lines: 33 Message-ID: References: <35894922 DOT 3FB5451E AT maths DOT unine DOT ch> Reply-To: sl AT psycode DOT com DOT NOSPAM NNTP-Posting-Host: 205.205.70.26 Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 8bit To: djgpp AT delorie DOT com DJ-Gateway: from newsgroup comp.os.msdos.djgpp Precedence: bulk On Thu, 18 Jun 1998 17:06:43, Gautier de Montmollin wrote: > exceptions are among the basic structures of the language, from the 1st version. > Examples: > > 1) > begin > (...) > if A_sym then -- LtL (Cholesky), cas symetrique > DPBTRF(upper, N=> nb_eq_2, KD=> lda-1, AB=> AB, LDAB=> lapmax); > else -- LU > DGBTRF(M=> nb_eq_2,N=> nb_eq_2, KL=> lda-1, KU=>lda-1, > AB=> AB, LDAB=> lapmax, IPIV=> pivots); > end if; > exception > when Computation_error=> Put("pivot 0, ligne / mineur <0 d'ordre"); > Put(info); raise; -- re-raise Computation_error after message > end; > > 2) > begin > (...) > exception > when Out_Of_Range | Out_Of_Buffer_Range => null; -- SVGA > end; > > -- > Gautier I see.. But I don't know ADA :) All I know is Basic, Pascal, C, C++. Gili