head	1.2;
access;
symbols
	pkgsrc-2013Q2:1.1.0.12
	pkgsrc-2013Q2-base:1.1
	pkgsrc-2013Q1:1.1.0.10
	pkgsrc-2013Q1-base:1.1
	pkgsrc-2012Q4:1.1.0.8
	pkgsrc-2012Q4-base:1.1
	pkgsrc-2012Q3:1.1.0.6
	pkgsrc-2012Q3-base:1.1
	pkgsrc-2012Q2:1.1.0.4
	pkgsrc-2012Q2-base:1.1
	pkgsrc-2012Q1:1.1.0.2
	pkgsrc-2012Q1-base:1.1;
locks; strict;
comment	@# @;


1.2
date	2013.07.09.10.16.02;	author marino;	state dead;
branches;
next	1.1;
commitid	BbekkfNC6VvauMWw;

1.1
date	2012.03.27.21.49.52;	author dholland;	state Exp;
branches;
next	;


desc
@@


1.2
log
@devel/gps: Upgrade GNAT Programming Studio to version 5.2.1

This is a significant upgrade over version 5.0.1 which is currently in
pkgsrc, representing approximately two years of work.  The latest online
documentation can be browsed here:

   http://docs.adacore.com/gps-docs/users_guide/_build/html/

Changes to the package itself include:
* python now works and is a default option
* readline support is now an option and is default
* Multiple job support enable
* Documentation now generated by sphinx

Also the problem described in PR#47824 no longer occurs, so this PR will
be closed.
@
text
@$NetBSD: patch-distrib_gnat__switches_awk,v 1.1 2012/03/27 21:49:52 dholland Exp $

Escape braces in gawk regexps; otherwise they become interval
expressions, and the latest gawk doesn't like invalid interval
expressions much.

--- distrib/gnat_switches.awk~	2008-06-30 07:58:03.000000000 +0000
+++ distrib/gnat_switches.awk
@@@@ -44,9 +44,9 @@@@ warnings == 1 && st > 0 && st < 4 && /^@@
 
 # print the short comment. Do this after all previous handling of st == 3, as
 # we don't want them to analyse the current string.
-warnings == 1 && st == 2 && /^@@emph{/ {
-    sub (/@@emph{/, "         \"\"\"",$0)
-    sub (/}$/, "\"\"\", \n         \"\"\"",$0)
+warnings == 1 && st == 2 && /^@@emph\{/ {
+    sub (/@@emph\{/, "         \"\"\"",$0)
+    sub (/\}$/, "\"\"\", \n         \"\"\"",$0)
     printf ("%s", $0)
     prev=""
     itemize=0
@@@@ -99,12 +99,12 @@@@ styles == 1 && /@@item / {
     st = 2
 }
 
-(validity == 1 || styles == 1) && st == 2 && /^@@emph{/ {
-    sub (/@@emph{/, "         \"\"\"",$0)
-    sub (/}$/, "\"\"\", \n         \"\"\"",$0)
+(validity == 1 || styles == 1) && st == 2 && /^@@emph\{/ {
+    sub (/@@emph\{/, "         \"\"\"",$0)
+    sub (/\}$/, "\"\"\", \n         \"\"\"",$0)
     # remove any @@code{sth} or other texi commands from the short description.
-    sub (/@@[^{]*{/,"",$0)
-    sub (/}/,"",$0)
+    sub (/@@[^\{]*\{/,"",$0)
+    sub (/\}/,"",$0)
     printf ("%s", $0)
     prev=""
     itemize=0
@@@@ -176,10 +176,10 @@@@ st == 3 {
     gsub (/</, "\\&lt;", $0)
     gsub (/>/, "\\&gt;", $0)
     gsub (/\"/, "'", $0)
-    gsub (/@@dots{}/,"..",$0)
+    gsub (/@@dots\{\}/,"..",$0)
     # remove all @@foo{}
-    gsub (/@@[^ {]*{/,"",$0)
-    gsub (/}/,"",$0)
+    gsub (/@@[^ \{]*\{/,"",$0)
+    gsub (/\}/,"",$0)
     gsub (/@@ifclear [^ ]*/,"",$0)
     gsub (/@@end [^ ]*/,"",$0)
     gsub (/@@[^ ]*/,"",$0)
@


1.1
log
@Escape braces in gawk regexps; otherwise they become interval
expressions, and the latest gawk doesn't like invalid interval
expressions much.
@
text
@d1 1
a1 1
$NetBSD$
@