b82428243b
has much stricter Ada 95 style checking. PR: 34749 Submitted by: MAINTAINER
11 lines
314 B
Ada
11 lines
314 B
Ada
--- gnatbind.adb.orig Fri Sep 1 10:13:51 2000
|
|
+++ gnatbind.adb Fri Feb 8 21:50:43 2002
|
|
@@ -183,7 +183,7 @@
|
|
|
|
Next_Arg := 1;
|
|
Scan_Args : loop
|
|
- exit when Next_Arg >= Arg_Count;
|
|
+ exit Scan_Args when Next_Arg >= Arg_Count;
|
|
declare
|
|
Next_Argv : String (1 .. Len_Arg (Next_Arg));
|
|
|