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,aa0a204aba5ffa1 X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news4.google.com!news.glorb.com!tudelft.nl!txtfeed1.tudelft.nl!feeder1.cambrium.nl!feed.tweaknews.nl!news.netcologne.de!nhp.netcologne.de!newsfeed.arcor.de!newsspool2.arcor-online.net!news.arcor.de.POSTED!not-for-mail Newsgroups: comp.lang.ada Subject: Re: GNAT Spitbol segmentation fault From: Georg Bauhaus In-Reply-To: <5197nkF1jbsb0U1@mid.individual.net> References: <5197nkF1jbsb0U1@mid.individual.net> Content-Type: multipart/signed; micalg=pgp-sha1; protocol="application/pgp-signature"; boundary="=-kbPs5gmvpWmff5T670zn" Message-Id: <1169130732.20258.5.camel@localhost> Mime-Version: 1.0 X-Mailer: Evolution 2.6.1 Date: Thu, 18 Jan 2007 15:32:12 +0100 Organization: Arcor NNTP-Posting-Date: 18 Jan 2007 15:29:53 CET NNTP-Posting-Host: 9fe5cb66.newsspool1.arcor-online.net X-Trace: DXC=D\W\?k2SAoFE4ZB2flKORAic==]BZ:afN4Fo<]lROoRA^YC2XCjHcbI9_hT;BI2?gDN[W --=-kbPs5gmvpWmff5T670zn Content-Type: text/plain Content-Transfer-Encoding: quoted-printable On Thu, 2007-01-18 at 13:33 +0100, Alex R. Mosteo wrote: > Hello, >=20 > before filing a bug report I'd like to hear your opinion to rule out a > mistake on my part. I'm using the excellent Gnat.Spitbol.Patterns package > to extract some patterns from large bodies of text. I'm doing it with thi= s > scheme: >=20 > declare > Text : aliased Vstring :=3D ; > Target : aliased Vstring; An ad hoc: I ran into trouble when forgetting to initialize unbounded strings to the null string. Nul in the case of Target, I think. > =20 > Patt : constant Pattern :=3D Some_Patterns ** Target; > begin > while Match (Text, Target, "") loop Patt ? > -- This extracts a Target string and removes it from the text. > -- It doesn't matter if the surrounding text causes new aftermatch= es. > Do_Something_With (Target); > end loop; > end; --=-kbPs5gmvpWmff5T670zn Content-Type: application/pgp-signature; name=signature.asc Content-Description: This is a digitally signed message part -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.2.2 (GNU/Linux) iD8DBQBFr4TrZkHTRMS+9qsRArUAAJ0RuiKgJimoI3lRCZKoJd36xkkh5ACfcRN0 e1ak50h3hQv+xErhBEWMIHc= =ODcI -----END PGP SIGNATURE----- --=-kbPs5gmvpWmff5T670zn--